| Blog信息 |
|
blog名称:注册会计师（注会）练习软件
日志总数:398
评论数量:116
留言数量:27
访问次数:3268388
建立时间:2005年6月6日 |
| |
|
 [delpih编程]tms控件 TColumnComboBox 的程序中增加显示行与列（多列显示的combobox)
软件技术
吕向阳 发表于 2009/3/30 21:40:00 |
| tms控件 TColumnComboBox 的程序中增加显示行与列
（多列显示的combobox)
procedure TForm1.Button1Click(Sender: TObject);
begin
com1.Columns.Add;//增加显示列1
com1.Columns.Add;//增加显示列2
com1.ComboItems.Add;//增加显示行1
com1.ComboItems.Items[0].Strings.add('001'); //为行1列1 赋值
com1.ComboItems.Items[0].Strings.add('aaa');//为行1列2赋值
com1.ComboItems.Add;//增加显示行2
com1.ComboItems.Items[1].Strings.add('002');//为行2列1 赋值
com1.ComboItems.Items[1].Strings.add('ccb');//为行2列2 赋值
end;
procedure TForm1.com1Change(Sender: TObject);
begin
showmessage(com1.ColumnItems[com1.ItemIndex,0]);//取出选中的返
回值
end; |
|
|