604
社区成员
发帖
与我相关
我的任务
分享
TList *myCheckBox = new TList; //创建TList类
for(int i=0;i<N,++i)
{
TCheckBox *chk = new TCheckBox(this); //在画面上要显示的checkbox
chk->Parent = this; //直接放在form上就可以
chk->Caption = AnsiString(i);
chk->Checked = false;
chk->Top = ...; //位置
chk->Left = ...;
myCheckBox->Add(chk);//加入到TList类中
}
void __fastcall TForm1::Button1Click(TObject *Sender)
{
const int N = 10;
TCheckBox *chks[N];
for (int i = 0; i < N; i++)
{
chks[i] = new TCheckBox(this); //怎样才能使这种形式正确?
chks[i]->Parent = this;
chks[i]->Caption = IntToStr(i);
chks[i]->Checked = false;
chks[i]->Top = (chks[i]->Height + 10) * i + 10;
chks[i]->Left = 10;
}
}
for(int i=0;i<N,++i)
{
TCheckBox *chk[i] = new TCheckBox(this); //怎样才能使这种形式正确?
chk->Parent = ...;
chk->Caption = ...;
chk->Checked = ...;
chk->Top = ...;
chk->Left = ...;
}
bool bChecked;
for (int i = 0; i < myCheckBox->Count; i++)
{
bChecked = ((TCheckBox *)myCheckBox->Items[i])->Checked;
...
}