Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Blackpit,
13. Jul 2019
DANKE!
Man sollte doch mal schluss machen;)
Wie sollte es ohne with gehen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by Blackpit,
13. Jul 2019
Hallo,
kann mir jemand sagen, warum das nicht geht?
While not mtdata.Eof do
Begin
with TVCheckListBox(FindComponent('lst_ausstattung' + IntToStr(CAT_ID -2))) do
begin
// showmessage(mtData.FieldByName('Bezeichnung').asstring); // funktioniert
Items.Add := mtData.FieldByName('Bezeichnung').AsString; // <= "Ungenügende Parameter"...