Perfekt! Eigentlich auch logisch! Dickes Dankeschön!
Nur der Vollständigkeit halber ... für alle, die das gleiche Problem hatten:
Eine kleine Korrektur beim Eventhandler:
Delphi-Quellcode:
procedure TForm1.SetupJaNeinEventHandler(fields:TFields);
var
i : Integer;
f : TField;
begin
for i:= 0 to fields.Count-1 do
begin
f := fields[i];
if f.DataType=ftBoolean then
f.OnGetText := self.BooleanJaNeinGetText;
end;
end;
Problem gelöst!
