Zitat von
Snoop007:
Delphi-Quellcode:
procedure TOvaleLeiste.schreiben(value : TStringlist);
begin
FItems := value;
refresh;
end;
´
Damit produzierst du nur Speicherlecks. Bei einem Objekt sollte (außer man weiß genau was man macht) das schreiben so ablaufen:
Delphi-Quellcode:
procedure TOvaleLeiste.schreiben(value : TStringlist);
begin
FItems.Assign(value);
refresh;
end;