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;
相关问答：
VC 控制台程序:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
我本来在学校是弄的J2EE
昨天去了长沙一家公司应聘 说是有一个项目 delphi的
实习期一个月 四天半的delphi培训 后面25天给你一个设计文档自己做一个项目
走后不久打电话过来叫我星期一去报到
看到delphi� ......
橙子的空间里面关于D2011的一切评测都没有了，原因麻，不明白，反正就是已经删了..............
一个真实发言都不能接受的新东家，我们还是早日改选别的吧.....................
杯具......................... ......
Delphi 控制打开了诸多网页，但是有些有弹出窗口，想把他屏蔽掉(禁止弹窗),想通过禁用IE脚本的方式达到目的？如何实现？
（就象我们操作Internet选项中，禁止运行活动脚本一样）
转：
.改注册表，google下很容易� ......
手头有一个小CASE，要用到数据库，想采用SQLite。
有用过的朋友吗？
要怎么安装sqlite服务？还是不需要安装？
用什么软件来管理Sqlite数据库？如添加表，写存储过程等。
delphi中怎么样连接到sqlite数据库？用什 ......
