Vor allem solltest du deiner Prozedur mal nen Namen geben:
Delphi-Quellcode:
procedure MachWas(Sender: TField; var Text: String; DisplayText: Boolean) ;
begin
Text := FormatFloat('000000', Sender.AsInteger);
end;
{...}
_FormatOnGetText := MachWas;
Dani H.
At Least I Can Say I Tried