meinst du mit BeginUpdate/EndUpdate, dass ich quasi das TStrings Objekt (also .Items) der listbox ändere, das ganze aber aus irgendwelchen gründen nicht dargestellst wird? (also quasi geupdated?)
und hier der ClearClerks Code:
Delphi-Quellcode:
procedure TSchedClerks.ClearClerks;
var
i: integer;
begin
if assigned(FClerkBox) then
begin
FClerkBox.Free;
FClerkBox := nil;
end;
for i := 0 to lst_clerks.Count - 1 do
begin
TStaffObj(lst_clerks.Items.Objects[i]).Free;
end;
lst_clerks.Items.Clear;
end;
wie gesagt, erfüllt seinen zweck, wenn aus der FormKlasse selbst aufgerufen
aber nicht, wenn es aus aus der TClerkBox-Klasse heraus aufgerufen wird
/edit: der teil mit FClerkBox.Free dient nur dazu, eine ggf. angezeigte GroupBox zu schließen. Wobei mir jetzt gerade erst auffällt, dass sich die Klasse ja quasi aus sich selbst heraus abschießen würde. Eine prozedur der Instanz von TClerkBox ruft die methode ClearClerks der Instanz von TSchedClerks (also der form) auf, welche wiederrum eigentlich genau die Instanz der TClerkBox zerstören sollte, die ClearClerks aufgerufen hat.
gibt aber keinen fehler
also entweder bin ich zu 100% ein opfer von "betriebsblindheit" geworden oder ich versteh grad gar nichts mehr *g*