Delphi 语句

来源:百度知道 编辑:UC知道 时间:2024/06/22 01:57:42
建立了一个radiobutton
主要想法是当选择第一个按钮就在第一个表中查询
当选择第二个按钮就在第二个表中查询

if form1.ActiveControl:=RadioButton3 then

出现错误[Error] Unit1.pas(48): Type of expression must be BOOLEAN

我初学,望大家指教一下谢谢

用radiogroup控件,增加两个Items,就相当于增加了两个radiobutton
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
//点击第一个Radiobutton
if radiogroup1.ItemIndex=0 then
......
//点击第二个Radiobutton
if radiogroup1.ItemIndex=1 then
......
end;