![]() |
2-dimensionales Array füllen
Hallo,
ich male mit Canvas ein kariertes Feld auf ein Form.
Delphi-Quellcode:
Wie kann ich jetzt dem Array für jedes Kästchen einen Wert zuweisen?
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. 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 |
Re: 2-dimensionales Array füllen
...[Spalte,Zeile]
test[1,1] wär das linke obere kästchen test[2,1] wär in der 2ten spalte das kästchen in der ersten zeile usw. z.b. kannst du sagen test[20,1] := 3; Dann hat das obere rechte Kästchen den wert 3 |
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:14 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz