多个radiobutton控件来实现显示数据库不同表格内容,可有简便方法?(100分)

  • 主题发起人 主题发起人 maplesw
  • 开始时间 开始时间
M

maplesw

Unregistered / Unconfirmed
GUEST, unregistred user!
我想用十几个radiobutton来实现这样的功能:分别点击每个radiobutton,在同一dbgrid中
显示不同的数据库表格的内容。最笨拙的方法是对每个radiobutton的单击事件编写大致相同
的代码,现在想用简单的方法实现,可有?谢了先!
 
首先设置RadioButton的Tag属性1......9....
在RadioButton的OnClick事件里加下列语句:
Case ( Sender as TRadioButton ).Tag of
1:(RadioButton1对应的特有代码)
2:(RadioButton2对应的特有代码)
.....................
end;
(公共代码)
 
所有RadioButton公用同一个代码就可以了
 
在FormCreate中将每个RadioButton的.HelpKeyword分别设置为各自的表名,
所有RadioButton共用同一个代码,如下:
begin
Table1.TableName = (Sender as TRadioButton).HelpKeyword;
{如果使用Query的话则:
Query1.Sql.Clear;
Query1.Sql.Add('select * from '+(Sender as TRadioButton).HelpKeyword)
Query1.Open;}
{另外的则根据实际需要,慢慢自己实现}
end;
 
那个case语句放在哪里?如果所有的radiobutton公用同一代码,是不是还要分别写每个
radiobutton的onclick事件?
 
onclick事件处理函数是你自己指定的,你都吧他指定成radiobutton1click这个函数就可以了
(radiobutton1click就是第一个按纽的处理函数)
 
多人接受答案了。
 

Similar threads

回复
0
查看
968
不得闲
回复
0
查看
852
不得闲
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
后退
顶部