我想用用combox和listbox,
但是不知道如何使用,
对基本用法和属性都不知道,
请高手帮忙!
谢谢!
但是不知道如何使用,
对基本用法和属性都不知道,
请高手帮忙!
谢谢!
解决方案 »
- 怎样将记录结构写入BUF中?
- 关于界面控件的一个小问题,大家一起来讨论看看!顶了就有分送。
- 如何获得CD/DVD-RM/CDRW的硬件设备名称,版本号等信息!!!!!!在线等!!!!!!!!!!!!!!!
- 在线等待-100分 怎么在程序中创建2个线程,让他们各干各的事情
- 各位大哥,像联众那样程序在线升级是怎么做的,急急急急急急急急
- 为何抓屏不成功?(有源码)
- 中国式报表(ereport)控件的小BUG,哪位大侠能帮助解决???
- 我有成百个Access数据库,用Adoquery+dbgrid如何把所有符合条件的记录查出来并对数据操作?
- 在delphi里怎么调用用vc编写的com接口?
- 谁帮我看看这段内嵌的 汇编 代码 谢谢!
- 今天我的第一个com+/MTS的程序可以运行了。。。。
- 程序做好了,但打包成了我的大问题
ComboBox1.ItemIndex := -1 //or 0 or 1... <---指定显示哪一项内容
ComboBox1.Clear; //清除所有已经存在的内容ListBox1.Add (); //添加内容
ListBox1.Clear ();//清空内容这些是基本的东东,详细的请看联机帮助。
如何知道combobox的itemindex被用户选择改变了呢?
procedure TForm1.FormCreate(Sender: TObject);
begin
{添加数据}
form1.listbox1.Items.add('1');
form1.listbox1.Items.add('2');
form1.listbox1.Items.add('3');
form1.listbox1.Items.add('4');
form1.listbox1.Items.add('5');
form1.listbox1.Items.add('6');
form1.listbox1.Items.add('7');
form1.listbox1.Items.add('8');
form1.listbox1.Items.add('9');
end;procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
{双击某个items然后删除}
form1.ListBox1.Items.Delete(listbox1.ItemIndex);
end;procedure TForm1.ListBox1Click(Sender: TObject);
begin
edit1.text:=form1.listbox1.items.Strings[form1.ListBox1.itemindex];
end;procedure TForm1.Button1Click(Sender: TObject);
begin
form1.listbox1.Items[listbox1.itemindex]:=edit1.text; {修改数据}
end;祝:身体健康,分数和答案同样重要:)