Hallo,
ich male mit Canvas ein kariertes Feld auf ein Form.
Delphi-Quellcode:
var
Form1: TForm1;
test: array[1..20,1..20] of integer;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var a,b,i,j: integer;
begin
for a := 1 to 20 do begin
for b := 1 to 20 do begin
canvas.Rectangle(a*20,b*20,a*20+20,b*20+20);
end;
end;
end;
end.
Wie kann ich jetzt dem Array für jedes Kästchen einen Wert zuweisen?
Ich versteh das Prinzip mit dem mehrdimensionalen Array noch nicht so ganz.
Also z.B. Test[5,10], wie verwende ich das? sind da jetzt 2 Werte drin gespeichert oder wie ist das?
Hoffe ihr könnt mir das erklären
Gruß
Spurius