Formatierung im StringGrid

[Kunoishi]

ich habe das so gemacht

Delphi-Quellcode:

procedure TArtikelerfassungForm.editEinzelpreisExit(Sender: TObject);
var l,b,u:real;
begin
 Try
  l:=strtofloat(EditArtikelAnzahl.text);
 Except
   Showmessage('Eingabefehler bei der Artikelanzahl !');
   l := 0;
   EditArtikelAnzahl.Text := '0';
 end;
 Try
  b:=strtofloat(EditEinzelPreis.text);
 Except
   Showmessage('Eingabefehler bei dem Artikeleinzelpreis !');
   b := 0;
   EditEinzelpreis.Text := '0';
 end;
  u:=l*b;
  EditGesamtPreis.Text := FloattostrF (u,ffGeneral,6,0);
  EditAbteilung.setfocus
end;

ich hoffe ihr meint das