آرایه ای کردن کنترل ها

[ssmehizadeh]

سلام
می خواستم بدونم چطوری میتونیم کنترل ها رو ( label ) به صورت آرایه ای باشه ( مثل VB ) تا وقتی که مخواهیم اونو صدا بزنیم بتونیم بگیم label[count].caption .

موفق و پیروز باشید .

[Hamid_PaK]

از TList استفاده کنید ...

یا حق !!!

[oghab]

این مثال کمکتون می کنه:


for i:= 0 to ComponentCount- 1 do
begin
if Components[i] is TEdit then
(Components[i] as TEdit).Text:= 'Component no : '+ IntToStr(i);
end;

[ssmehizadeh]

ببخشید ....
اگه ممکنه یخورده بیشتر توضیح بدید
متوجه نشدم

موفق و پیروز باشید .

[Hamid_PaK]

روش که دوست عزیز اقاب توضیح دادند از []Components استفاده می کند که لیست ابجکتهای
موجود است ...


for i:= 0 to ComponentCount- 1 do
begin
if Components[i] is TLabel then
TLabel(Components[i]).Caption := 'Component no : '+ IntToStr(i);
end;

ولی اگر شما نیاز دارید که یکسری ابجکت خاص را در یک لیست قرار دهید و باز هم با روشی که گفته شد می توانید تغییرات مورد نظر رو اعمال کنید ...

یا حق !!!

[ssmehizadeh]

ممنون از راهنمایتون

موفق و پیروز باشید

[راحله سعادتی]

چرا دلفی نتوانسته همانند ویژوال بیسیک کنترل ها را آرایه ای کند ؟

شاید دلیلش ... نمی دانم

[jirjirakk]

قرار نیست هر شرکتی محصولی رو که میده قابلیت های محصول شرکت دیگه ای رو داشته باشه هرچند دلفی توی این مبحث خیلی قویتر از وی بی کار کرده