Hallo BadenPower,
(würdest du bitte deinen Test hier mal reinstellen? ich bekomme nur oben genannten Schrott hin)
hat sich erledigt!
Delphi-Quellcode:
procedure TForm1.ZQuery1ZEITGetText(Sender: TField; var aText: string;
DisplayText: Boolean);
begin
Text := FormatDateTime('hh:mm', Sender.AsDateTime);
end;
procedure TForm1.ZQuery1ZEITSetText(Sender: TField; const aText: string);
begin
Sender.AsDateTime := DateOf(Sender.AsDateTime) + StrToTime(Text);
end;
allerdings unterscheidet sich bei lazarus wohl der parametername aText.
Wenn ich diesen in Text umbenenne bekomme ich Folgendes:
unit1.pas(28,54) Hint: Identifier already defined in
unit CONTROLS at line 1393
EDIT :
klar, wenn mein Parameter aText heisst, sollte ich in der procedure auch aText verwenden
