delphi array
const Days : array[1..7] of string = ('Mon','Tue','Wed','Thu','Fri','Sat','Sun'); var i : Integer; begin for i := 1 to 5 do // Show the weekdays ShowMessageFmt('Day %d = %s',[i,Days[i]]); end;
delphi array
const Days : array[1..7] of string = ('Mon','Tue','Wed','Thu','Fri','Sat','Sun'); var i : Integer; begin for i := 1 to 5 do // Show the weekdays ShowMessageFmt('Day %d = %s',[i,Days[i]]); end;
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.
Copyright © 2021 Codeinu
Forgot your account's password or having trouble logging into your Account? Don't worry, we'll help you to get back your account. Enter your email address and we'll send you a recovery link to reset your password. If you are experiencing problems resetting your password contact us
