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;
相关问答：
就是一个服务端和一个客户端，里边有一些共用单元 ，我在 工程的SEARCH PATH里设置的路径，
里边有个结构体，我在服务端打开，加了成员，但是我在客户端其他单元访问不到我新加的，我在客户端打开那个单元，确实加� ......
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 ......
delphi 手动装载驱动文件提示：
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
是不是这个驱动必需要用INF来安装。。用自带的INF来装是正常的。用手动装载就提示如上� ......
服务器是一个网络设备，目前在内网，IP固定为192.168.1.123，开放9707~9738共31个连续端口(用XP自带的超级终端试过了，这些端口都可以正常连接、通讯)。
用TcpClient控件写的客户端软件，就9730这个端口无法建立连� ......
单就DELPHI编译器而言，我简单总结了下从D7到D2010以来的一些新的东西
1、 Unicode String 支持，这恐怕是最大的改变；
2、 新的RTTI机制，试用了一下，确实比以前那个好太多了；
3、 泛型（Generics），delphi也 ......
