在delphi中如何用sql语句查询语句将查询的结果中的一个列值显示在一个edit中?

解决方案 »

  1.   

    很简单,
    edit.text:=dataset.field[0].asstring;
      

  2.   

    adoquery1.close;
    adoquery1.sql.clear;
    adoquery1.sql.add('select * from yourtablename');
    adoquery1.open;
    adoquery1.recno:=n;//设置纪录号
    edit1.text:=adoquery1.fieldbyname('列名').asstring;
      

  3.   

    easy!!!!!!!!!!!!!!11
    edit1.text:=adoquery1.fieldbyname('列名').asstring;
      

  4.   

    请大家帮我看看:我的窗口上有combobox1,combobox2和一个edit1,我的目的是在combobox1中选择一项(一个表名字,学生登记表),combobox2中列出这个表的一列的所有值(学生登记表中所有学生的学号),然后在combobox2中选中这个表的一个列的值,在edit1中显示与combobox2中的列对应的另一列的值(学生姓名),代码如下:
    procedure TForm1.ComboBox1Change(Sender: TObject);
    begin
    if combobox1.Text='VV' then    //vv学生登记表名
      begin
        adotable2.TableName:='VV';
        COMBOBOX2.Items.Clear;
        ADOTABLE2.Active:=TRUE;
        DataSource2.DataSet.First;
        while not DataSource2.DataSet.eof do
          begin
           combobox2.Items.add(DataSource2.DataSet.FindField('xuehao').asstring);
           DataSource2.DataSet.Next;
          end;
      end
      else
      BEGIN
      COMBOBOX2.Items.Clear;
      combobox2.Text:='无数据'
      END
    end;procedure TForm1.ComboBox2Exit(Sender: TObject);
    var
    x:string;
    begin
    IF combobox1.Text='VV' then
    begin
    ADOquery1.close;
    ADOquery1.sql.clear;
    ADOquery1.sql.add('select JINER from VV WHERE JIEMIAN=combobox2.text');
    ADOquery1.execsql;
    ADOquery1.open;
    x:=adoquery1.DesignerData;
    edit1.Text:=x;
    end
    end;运行时出错:参数COMBOBOX2.Text没有默认值。小妹出学。
      

  5.   

    edit1.text:=query['字段名'].AsString;   //必须时字符串型的否则需转换
      

  6.   

    这样只能得到一个值,不能随着combobox2.text的变化而改变!