Online-Skater
Erfahrenes Mitglied
Code:
procedure TForm1.FeldPaint(Sender: TObject);
var i : integer;
begin
with Feld.Canvas do
begin
pen.Color := clBlack;
brush.Color := clSilver;
rectangle(0,0,401,401);
end;
i := 5;
while i < 400 do
with Feld.Canvas do
begin
MoveTo(i,0);
LineTo(i,400);
MoveTo(0,i);
LineTo(400,i);
i := i + 5;
end;
end;
Problem: Ich hab ein Feld mit kästchen drinn wie kann ich das mit arrays initialisieren und ansprechen ?
also feld[1,1] usw..
wäre cool wenn mir ein tip gegeben wird

denn ich hatte alternativ ein Stringgrid da kann ich ja per Stringgrid1.Cell[a,b] zugreifen aber wenn was gezeichnet wied weis ich es nicht
