赋值遇到NULL该怎么办? edit1.text:=query1.fields[0].value如果查询的结果为null出现错误请问如何处理?难道在每次赋值前要先进行判断? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我就是每次先判断一下,但你用try……语句也行 if query1.fields[0].value=Null then edit1.clearelse edit1.text:=trim(query1.fields[0].value) 用self.query1.open查询完之后,加上一句if((self.query1.bof=true)and(self.query1.eof=true))thenbeginshowmessage("查询的结果为空!!!");exit;end;这样也可以给用户一个提示! 换成edit1.text:=query1.fields[0].AsString;就行了,NULL会自动转化为空字符串的。 edit1.text:=query1.fields[0].AsString;oredit1.text:=query1.fields[0].asvalues; 录入数据校验问题 有武汉单位要老家伙吗? 帮帮忙关于indy的下载整个目录 关于VclSkin 安装的问题,请求高手!! 一个关于汉字的问题 在ADOTable中如何查找一条特定的记录,比如第三条,第四条等 你们没有遇到这种情况吗? 在EhLib24中如何刷新Footer的Sum数据? ! 如何通过一个菜单点击去发送一个消息给Form,使Form能翻译成多语言的?????????/ delphi6中fastNet页的NMUDP控件的.pas文件在哪儿?能把它加到delphi7中么?? 怎样为动态增加的控件添加事件代码?
edit1.clear
else
edit1.text:=trim(query1.fields[0].value)
if((self.query1.bof=true)and(self.query1.eof=true))then
begin
showmessage("查询的结果为空!!!");
exit;
end;
这样也可以给用户一个提示!
or
edit1.text:=query1.fields[0].asvalues;