how to create an array in delphi
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation //////////////////////////////////////////////////////////////////////// //constant arrays const Numbers : array[1..9] of string = ('1','2','3','4','5','6','7', '8', '9'); //you can also create and integer type array IntNumbs : array[1..5] of integer = (1, 2, 3, 4, 5); ////////////////////////////////////////////////////////////////////// {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin end; end.
