@Jelly
In der Prozedur
LoescheArr löschst du leider nur die lokale Kopie des Arrays. Besser so:
Delphi-Quellcode:
procedure LoescheArr (var Arr: TArr); // <-- VAR-Parameter!
begin
FillChar (Arr, SizeOf(Arr), 0) ;
end;
@LePtitmort
Bei der Verwendung einer PaintBox solltest du nur innerhalb der Methode
OnPaint zeichnen. Siehe dazu auch
diesen Beitrag.
Gruß Hawkeye