Strings in Stringgrid Spalten mit Währung Formatieren

[Natcree]

Delphi-Quellcode:

   except
     on E: Exception do
       begin
         MessageBox(0, PChar(E.Message), nil, MB_OK or MB_ICONERROR);
         Irgendwas.Free;
       end;

Was haben denn die letzten code zeilen zu sagen???