خواندن مقدار چند چک باکس با یک حلقه for

[bmanfy]

سلام دوستان من روی فرمم 30 تا چک باکس گذاشتم ، و یک متغییر از نوع Tcheckbox تعریف کردم ، حالا میخوام با یک حلقه ی For این چک باکس ها رو به این متغییر نسبت بدم و مقدار اونا رو بخونم

[ghabil]

controlcount یا ComponentCount رو سرچ کن بارها توضیح داده شده
ضمنا این سوال چه ربطی به دیتابیس داره که اینجا نوشتیتش؟

[bmanfy]

controlcount یا ComponentCount رو سرچ کن بارها توضیح داده شده
ضمنا این سوال چه ربطی به دیتابیس داره که اینجا نوشتیتش؟




به نظر جناب عالی باید کجا مینوشتم ها

[mjdeveloper]

سلام دوستان من روی فرمم 30 تا چک باکس گذاشتم ، و یک متغییر از نوع Tcheckbox تعریف کردم ، حالا میخوام با یک حلقه ی For این چک باکس ها رو به این متغییر نسبت بدم و مقدار اونا رو بخونم


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

من چک باکسها رو روی پنل فرض کرده ام
امیدوارم به دردتون بخوره


for i:=0 to panel1.ControlCount-1 do
begin
if panel1.Controls[i] is TCheckBox then
begin
case TCheckBox(panel1.Controls[i]).tag of
1:
if (TCheckBox(panel1.Controls[i]).Checked = true) then
//anything
2:
if (TCheckBox(panel1.Controls[i]).Checked = true) then
//anything
end;//case
end;


مهدی جعفری

[m-khorsandi]

به نظر جناب عالی باید کجا مینوشتم ها

مشکلی نیست :چشمک: ، ولی نه عنوان و نه سئوالت به دیتابیس ربطی نداره، برای اینکه سریعتر به جواب برسی، میتونستی سئوالت رو در بخش عمومی دلفی مطرح کنی و قبل از مطرح کردن اون هم جستجو کنی :

چطور میشه کپشن دکمه ها را از یه آرایه خواند؟ (http://www.barnamenevis.org/forum/showthread.php?t=63033)
کنترلها (http://www.barnamenevis.org/forum/showthread.php?t=700)
ساخت آرایه کنترلی در دلفی (http://www.barnamenevis.org/forum/showthread.php?t=24385)
ماسک ادیتهای پشت سر هم (http://www.barnamenevis.org/forum/showthread.php?t=32114)