简单麻烦的问题!!(10分)

  • 主题发起人 主题发起人 longjiang
  • 开始时间 开始时间
L

longjiang

Unregistered / Unconfirmed
GUEST, unregistred user!
怎么再窗体上加载100个控件,怎么把控件的name属性改成相同呀,名字完全相同,在代码中怎么识别他!!!是使用tag属性吗,在delphi中有类似vb中的index的属性吗
 
不可能 名字都一样就不能区分了
 
那我界面上有68个combobox的控件名字分别是combobox1....combobox68,但是要让他们都执行相同的代码怎么做呀,要就简单
 
Components
遍历所有combobox
 
晕了,还有别的办法吗
 
遍历了也没有用呀!!!
我想让他下拉的时候读取数据库的内容呀
 
用tag属性,设订要处理的combobox的tag为100-168,然后
for i := 0 to componentcount - 1 do
begin
if (TComboBox(components).tag <= 168) and (TComboBox(components).tag >= 100) then
begin
{按不同的tag值给每个combobox不同的处理}
end;
end;
这样行不?
 
谢谢楼上!!!小弟实在是笨呀!!
这段代码我放在什么地方呀!!
不知道是不是我没有说明白

这68个combobox的控件,执行的代码是一样的,我不想把每个combobox控件的chang的时间里都去写代码,这样太笨了,怎么能在一个combobox的时间里输入就可以了,其他的都来执行呢
 
procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if sender is TComboBox then
begin
.......//代码
end;
end;
所有的ComboBoxChange都引用它。
 
后退
顶部