Hallo,
@ FastDeath :
an Deinen Labels schreibst Du Dir ja die Finger wund !?
warum verwaltest Du Deine Spielflächen (Labels oder was auch immer)
nicht in arrays, dann kannst Du diese über eine oder wenige Schleifen
abarbeiten.
Beispiel:
Delphi-Quellcode:
private
Felder : array[1..64] of TLabel;
.
.
.
procedure TForm1.FormCreate(Sender: TObject);
var
i : Integer;
begin
for i := 1 to 64 do
begin
Felder[i] := TLabel.Create(Self);
with Felder[i] do
begin
Height := ....
Width := ....
Color := ....
end; // end with Felder[i]
end; // end for i
end;
ebenso lässt sich der Sender über eine Schleife abarbeiten