CheckBox勾選問題 |
答題得分者是:mnsf
|
7-11
一般會員 發表:53 回覆:33 積分:16 註冊:2005-12-05 發送簡訊給我 |
|
Coffee
版主 發表:31 回覆:878 積分:561 註冊:2006-11-15 發送簡訊給我 |
|
pcboy
版主 發表:177 回覆:1838 積分:1463 註冊:2004-01-13 發送簡訊給我 |
|
7-11
一般會員 發表:53 回覆:33 積分:16 註冊:2005-12-05 發送簡訊給我 |
我想指的是 可不可以用迴圈的方式把全部勾起來 因為我可能我100的項目 = ="
一行一行要打很久 ===================引 用 文 章=================== procedure TForm1.btn01Click(Sender: TObject); begin ? cb01.Checked:=True; ? cb02.Checked:=True; ? cb03.Checked:=True; ? cb04.Checked:=True; ? cb05.Checked:=True; end; |
pcboy
版主 發表:177 回覆:1838 積分:1463 註冊:2004-01-13 發送簡訊給我 |
|
Coffee
版主 發表:31 回覆:878 積分:561 註冊:2006-11-15 發送簡訊給我 |
Try to place all CheckBoxes into a panel or group and write the following code in Button click event
for i=0 to APanel.ComponentCount-1 do if APanel.Components[i] is TCheckBox then begin (APanel.Components[i] as TCheckBox).Checked=True; end; panel or group or form inherit from TWinControl and owns a Components array once you place any component into such component that can be a component container the container will have it in the components array. 後記:我記得有Component可以直接作check list,那樣會比較好
------
不論是否我發的文,在能力範圍皆很樂意為大家回答問題。 為了補我的能力不足之處,以及讓答案可以被重複的使用,希望大家能儘量以公開的方式問問題。 在引述到我的文時自然會儘量替各位想辦法,謝謝大家! |
mnsf
初階會員 發表:104 回覆:90 積分:48 註冊:2003-11-25 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |