mm:=query.fieldbyname('id').asstring;
/*************************************/
/*1、MY TOOL:*************************/
/*2、Delphi,Oracle,Sybase,C++/C*******/
/*3、PROJECT:*************************/
/*3、Boss*****************************/
/*4、为了五星的目标希望你早点结贴*********/
/*5、在线技术讨论(QQ):68123095*********/
/*************************************/

解决方案 »

  1.   

    202.38.66.123 
    /400M精品藏书!/计算机/数据库/DELPHI基础教程.chm
    202.38.73.141 
    /incoming/Book/Delphi5开发人员指南/
    /incoming/Book/400M精品藏书!/计算机/数据库/DELPHI基础教程.chm
    /incoming/Book/Delphi5开发人员指南/delphi 5开发人员指南.txt
    /pub/Book/Delphi/
    /pub/Book/Delphi/Delphi5编程实例与技巧/
    /pub/Book/Delphi/Delphi5开发人员指南/
    /pub/Book/Delphi/Delphi5企业级解决方案及应用剖析/
    /pub/Book/Delphi/Delphi5数据库开发技术/
    /pub/Book/Delphi/Delphi5编程实例与技巧/delphi 5编程实例与技巧.txt
    /pub/Book/Delphi/Delphi5开发人员指南/delphi 5开发人员指南.txt
    /pub/Book/Delphi/Delphi5企业级解决方案及应用剖析/delphi5企业级解决方案及应用剖析.txt
    /pub/Book/Delphi/Delphi5数据库开发技术/delphi 5数据库开发技术.txt
    /pub/Software/Programming/Delphi5_Enterprise/
    /pub/Software/Programming/Delphi5_Enterprise/Delphi5_Enterprise.zip
    pub/chinapub_unix_programming/Programming/Delphi 5开发人员指南/
    /pub/document/china-pub/chinapub_unix_programming/Programming/Delphi 5企业级解决方案及应用剖析/
    /pub/document/china-pub/chinapub_unix_programming/Programming/Delphi 5数据库开发技术/
    /pub/document/china-pub/chinapub_unix_programming/Programming/Delphi 5编程实例与技巧/Delphi 5编程实例与技巧.txt
    /pub/document/china-pub/chinapub_unix_programming/Programming/Delphi 5开发人员指南/Delphi 5开发人员指南.txt
    /pub/document/china-pub/chinapub_unix_programming/Programming/Delphi 5企业级解决方案及应用剖析/Delphi5企业级解决方案及应用剖析.txt
    /pub/document/china-pub/chinapub_unix_programming/Programming/Delphi 5数据库开发技术/Delphi 5数据库开发技术.txt
    /pub/linux/applications/Database/MySql/delphi/
    /pub/linux/applications/Database/MySql/delphi/DelphiMySQL.zip/*************************************/
    /*1、MY TOOL:*************************/
    /*2、Delphi,Oracle,Sybase,C++/C*******/
    /*3、PROJECT:*************************/
    /*3、Boss*****************************/
    /*4、为了五星的目标希望你早点结贴*********/
    /*5、在线技术讨论(QQ):68123095*********/
    /*************************************/
      

  2.   

    mm := query1.ExecSQL.Fields[0].AsString;
      

  3.   

    select id from TblOperator where xlh=1label1.caption :=query1.fieldbyname('id').asstring;
      

  4.   

    select mm=:id from TblOperator where xlh=1出错!
    你这语句本身有问题!select 是查找出记录集来啊,可能符合xlh=1条件的有好几条记录,你怎么赋给mm,加上select mm=:id ....这是什么语句?
    你可以这样做:
    begin
       with table1 do
    begin
        setkey;
        fieldbyname('xlh').asinteger=1;
      if     gotokey then 
       begin  
        showessage('Successs');
        mm:=fieldbyname('xlh').value;
      endelse
       showmessage('Failed');end;
    end;
      

  5.   


    Delphi下不支持此种书写格式(PB下还差不多),你还是一个个地取吧:xSQL := 'Select a.emp_Name as Name from table1 a, table 2 b where condions';
    QryTemp.Close;
    QryTemp.SQL.Clear;
    QryTemp.SQL.Add(xSQL);
    QryTemp.Open;if not QryTemp.Eof then Result := QryTemp['Name'] else Result := '';//取出当前行记录后返回。