delphi中一段代码问题
我有一个edit，一个button，将edit输入的内容在sql中进行查找，button按下后在后面显示出来，但是我有一个问题，如果在sql查询不到就很麻烦，像报错一样的跳一个对话框出来，我想如果没有搜索到，那跳一个对话框出来提示没有合适的查询，请问怎么弄？是自己添加一个form还是用showmessage？
都行，showmessage可能做起来更快
提示用showmessage最好.你可以把查询放到TRY中
if Qry.RecordCount = 0 then
ShowMessage('没有找到记录');
如果要它不报错：
用
try
...
except
...
finally
这个问题在于你想怎么做，showmessage就能弹出个框提示，如果你想附加更多的信息，就自己做一个窗体，显示一个窗体也不麻烦
try
if qy.IsEmpty then showmessage('没有找到记录！')；
except
on E:Exception do
ShowMessage(E.Message);
end;
showMessage很方便的
begin
if cus_name.Text=''
then showmessage('请输入要查询的客户姓名')
else
with adoquery1 do
begin
close;
sql.Clear;
sql.Add('select * from 预订客户查询表 where 客户姓名=:name');
Parameters.ParamByName('name').Value:= Trim(cus_name.text);
open;
try
if adoquery1.RecordCount = 0 then
ShowMessage('没有找到记录');
except
while not eof do
begin
cus_time.Text:=adoquery1.Fieldbyname('入住时间').AsString;
cus_rnum.Text:=adoquery1.Fieldbyname('房间号').AsString;
Next;
相关问答：
delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......
我本来在学校是弄的J2EE
昨天去了长沙一家公司应聘 说是有一个项目 delphi的
实习期一个月 四天半的delphi培训 后面25天给你一个设计文档自己做一个项目
走后不久打电话过来叫我星期一去报到
看到delphi� ......
select * from shuju.DB where 开盘价-收盘价<=0.02
开盘价 与收盘价 是数据库里的字段
select * from aTableName where ((开盘价-收盘价) <=0.02 )
开盘价比收盘价低两分以下的情况
Mark!!!!!!
se ......
程序使用的是Orcal数据库，想定期（每季度）对数据库进行备份，没啥头绪，请问应该怎么弄？
有什么特殊要求吗，比如要前端界面？
一般用数据库自带的“计划任务”配置一下就够了
没有什么特殊要求。例如，只要� ......
