Hallo,
ich habe folgenden(gekuerzten) Code:
Code:
for i:=0 to anzahl_panels -1 do begin
panels[i]:= tpanel.create(fdirectsync);
with panels[i] do begin
name:= 'Panels'+inttostr(i);
caption:= '';
parent:= fdirectsync.ScrollBox1;
hint:= adoquery.FieldDefs.Items[i].FieldClass.ClassName;
if (hint='TAutoIncField') and (adoquery=dm_data.aq_target) then
Caption:= 'Einem AutoInc - Feld kann kein Wert zugewiesen werden';
end;
Das klappt auch so, nur die Caption wird nicht angezeigt, obwohl beim Debuggen in diese Zeile gesprungen wird.
Aendere ich jedoch die 2.Zeile zu panels[i]:= tpanel.create(fsourcetarget) um, so klappt es. (Das will ich aber eigentlich nicht, da ich dann 100 FindComponent Prozeduren umschreiben muss). Der Code stammt aus der
Unit von fsourcetarget.
Wiso wird die Caption so nicht angezeigt?
Gruss und Dank
lkz633