var
FILEID: integer;close;
sql.clear;
sql.add('SELECT fileid FROM "filestyle.db"');
sql.add('WHERE filename=:fn');
parambyname('fn').asstring:=edit1.text;
Open;if not IsEmpty then
FILEID:=Fieldbyname('fid').asinteger;
FILEID: integer;close;
sql.clear;
sql.add('SELECT fileid FROM "filestyle.db"');
sql.add('WHERE filename=:fn');
parambyname('fn').asstring:=edit1.text;
Open;if not IsEmpty then
FILEID:=Fieldbyname('fid').asinteger;
解决方案 »
- 管理多个类是用TClassList好还是TObjectList
- 现在Delphi版是越来越热闹了
- 晕,所有对话框系统都默认为ok,是不是盗版的问题?
- 数组筛选问题
- 用DELPHI做登录窗口的问题
- TOOLBARC以及TOOLBUTTON问题,请大家帮忙!
- 创建表SQL语句---怎么创建一个列的默认值?(Sybase)
- XE6发布的Android出现application does not support this device
- 为什么在formclose中加入确定退出代码后,按确定没反应,按取消倒退出了?
- 请问各位大仙哪里有DELPHI的教材下载
- 双机互连双绞线怎么连水晶头那是1那是8(直接用双绞线连)
- 入门问题
FILEID: integer;close;
sql.clear;
sql.add('SELECT fileid FROM "filestyle.db"');
sql.add('WHERE filename=:fn');
prepare;
parambyname('fn').asstring:=edit1.text;
open;
FILEID:=fieldbyname('fileid').asinteger;还是不能!!!