用三个RadioButton,一个Listbox,选择RadioButton1在Listbox中显示全部ZhiZaoShang,选择RadioButton2在Listbox中国产ZhiZaoShang,选择RadioButton3在Listbox进口ZhiZaoShang,数据表结构如下,用ADO,ADOQuery1怎么写代码呢?
ZhiZaoShang CheXing                         LeiXing
A          145/146 1.3/1.4/1.6 8v   国产
A          145/146 1.4/1.6 TS 16V         国产
B          145/146 1.8/2.0 TS 16V         国产
C          145/146 1.9 TD 1994-99         国产
D          145/146         进口
F          145/146         进口
F          145/146         国产

解决方案 »

  1.   

    在Rb的Click时间中写
    with ADOQUery1 do
    begin
      Close;
      SQL.Text := '你的SQL语句';
      Open;
      ListBox1.Items.Add(FieldByName('字段').AsString);
    end;
      

  2.   

    procedure TcljsbzForm.RadioButton2Click(Sender: TObject);
    begin
    with ADOQUery1 do
    begin
      Close;
      SQL.Text := 'select zhizaoshang from car where LeiXing='国产'' ;
      Open;
      ListBox1.Items.Add(FieldByName('zhizaoshang').AsString);
    end;在RadioButton2中的查询怎么写?上面的运行时有错:Illegal character in input file: '国' ($B9FA)
      

  3.   

    procedure TcljsbzForm.RadioButton2Click(Sender: TObject);
    begin
    with ADOQUery1 do
    begin
      Close;
      SQL.Text := 'select zhizaoshang from car where LeiXing=''国产''' ;
      Open;
      ListBox1.Items.Add(FieldByName('zhizaoshang').AsString);
    end;
    end;
    改成这样后,不报错了 ,但是选择国产RB按钮,listbox1和选择全部是一样的,没有变化,怎么弄?才行呢?