mm:=query.fieldbyname('id').asstring;
/*************************************/
/*1、MY TOOL:*************************/
/*2、Delphi,Oracle,Sybase,C++/C*******/
/*3、PROJECT:*************************/
/*3、Boss*****************************/
/*4、为了五星的目标希望你早点结贴*********/
/*5、在线技术讨论(QQ):68123095*********/
/*************************************/
/*************************************/
/*1、MY TOOL:*************************/
/*2、Delphi,Oracle,Sybase,C++/C*******/
/*3、PROJECT:*************************/
/*3、Boss*****************************/
/*4、为了五星的目标希望你早点结贴*********/
/*5、在线技术讨论(QQ):68123095*********/
/*************************************/
解决方案 »
- 请问表单怎么调整TAB键的顺序
- 如何返回消息?
- 关于把adoquery过滤的值赋给edit.text的问题,很简单的?
- adotable1.loadfromfile后,如何知这个adotable1里数据的表名,load后tablename = 文件名了
- 如何在delphi程序中注册控件,然后使用
- wise作安装程序怎么配sybase1151的dsedit的server name即sybase的sql.ini文件
- 怎样在自己的程序中编辑WORD文档
- 是这样的:用update语句更改paradox数据库的备注形字段值时报错,显示容量不支持
- 利用TSOCKETSERVER向客户端发送数据,报内存访问地址错误。
- 怎样取文件的扩展名,和路径。
- 通过两个modem连接两台计算机,实现文件共享,在线等待!
- 关于一个数据查询的问题
/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*********/
/*************************************/
你这语句本身有问题!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;
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 := '';//取出当前行记录后返回。