چگونه می توان اشیاء در دلفی را مانند ویژوال بیسیک به صورت آرایه(اندیس) در آورد

[mojtaba802]

:blush: چگونه می توان اشیاء در دلفی را مانند ویژوال بیسیک به صورت آرایه(اندیس) در آورد
که مثلا بتوانیم چنین کدی را بنویسیم
for i:=1 to 10 do
edit[i].text:='OK';
با تشکر :blush:

[NoneForce]

سلام
arrLabel : array[1..30] of TLabel;

بعد بايد عناصر آرايه را درست كنيد
arrLabel[1] := Tlabel.Create(...)

[مرد مباح]

درست همان طوري كه دوستمان گفت عمل كنيد.

البته توضيحات بيشتري را بايد تنظيم نماييد.
مثل
top , left, Height , ...
تا درست نمايش داده شود

[mojtaba802]

;)
ببخشید من خیلی متوجه توضیح شما نشده منظور این است که اگر کد زیر را بنویسیم جواب بدهد:

procedure TForm1.Button1Click(Sender: TObject);
var arrLabel : array[1..30] of TLabel; I:Byte;
begin
arrLabel[1] := Tlabel.Create(label1);
arrLabel[2] := Tlabel.Create(label2);
arrLabel[3] := Tlabel.Create(label3);
arrLabel[4] := Tlabel.Create(label4);
for I:=1 to 4 do arrLabel[i].Caption:='Delphi';
end;
end.

متشکرم از شما
:) منتظر جواب شما دوست عزیز هستم

[NoneForce]

سلام
براي درست كردن يك كنترل بايد خاصيتهاي اساسي اون را تعريف كنيد. مثل والد- محل - اندازه و ...

var
arrLabel : array[1..10] of TLabel;
begin
arrLabel[1] := TLabel.Create(Form1);
arrLabel[1].Left := 10;
arrLabel[1].Top := 10;
arrLabel[1].AutoSize := True;
arrLabel[1].Caption := 'Hello';
arrLabel[1].Visible := True;
arrLabel[1].Parent := Form1;
end;

[z_ss_t]

آیا در دلفی مانند ویژوال اشیا آرایه ای index دارند؟

[z_ss_t]

من چند شی آرایه ای ساخته ام میخواهم روی هر کدام از آنها که کلیک کردم آن شی عمل خاصی را انجام دهد. لطفا کمکم کنید ....با تشکر!!!