Zitat von
Pr0g:
Dann aber das Freigeben nicht vergessen.
stimmt. Folgendes fehlt dann noch:
Delphi-Quellcode:
TForm1.FormClose(Sender: TObject);
var i: integer;
begin
for i := 0 to 10 do
ShapeArray[i].Free;
end;
//edit:
Das kommt davon, wenn man ne halbe Stunde nicht am PC ist
