如何使得Checklistbox只能单选?急!!!(100)

  • 主题发起人 主题发起人 xlf1979
  • 开始时间 开始时间
X

xlf1979

Unregistered / Unconfirmed
GUEST, unregistred user!
菜鸟请教各位高手,怎样才能Checklistbox只能单选?并且点击后面的文字的时候前面的选项框能自动打勾,前面所选的全部取消。
 
使用RadioButton1多好呀要么就判断,if Checklistbox1.checked thenbegin Checklistbox2.Checked := false; Checklistbox3.Checked := false; Checklistbox4.Checked := false; Checklistbox5.Checked := false;end;
 
谢谢你的帮助,我的数据里有几百个选项,所以不好使用RadioButton,还有我要求的是Checklistbox里不同的选项只能选一个,不是不同的Checklistbox只能选一个。
 
我研究一下。。。
 
我的数据里有几百个选项这本身就有问题,你的设计或架构肯定有问题,我实在难以想象有几百个选项的Checklistbox的界面是什么样子的,更别提让用户操作了。建议LZ转换思路,用别的方式实现,比如ComboBox等,看你的实际需求了。祝你好运!
 
呵呵,没办法,关联的是上万条的数据,只是查找修改,所以倒不难。
 
自己写一个控件继承checkboxlist里面写一个过程,和两变量,记录以前选中的和当前点选的过程里面取消以前选中的那个,设置当前点选的为选中
 
RADIOGOUP 分页分组显示
 
你用RADIOGROUP阿
 
是否可以在OnClickCheck中作一下处理:procedure TForm1.chklst1ClickCheck(Sender: TObject);var i: Integer;begin for i := 0 to chklst1.Items.Count - 1 do begin if chklst1.Checked then begin if (Integer(chklst1.Items.Objects) = 1) then begin chklst1.Checked := False; chklst1.Items.Objects := TObject(0); end else chklst1.Items.Objects := TObject(1); end; end;end;主要是借用了Items.objects来存放原来是否选中的状态,若有变动就是本次变更的,其余的均置为非选中
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
802
DelphiTeacher的专栏
D
D
回复
0
查看
747
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部