P powersite Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-29 #1 用ACCESS数据库,读出某字段值,如果为空值,故得值为null,但欲与某edit.text相比较,运行时,将会出错。用何方法将读出的字段值规范为string类型,如果其值为null,则自动规范化为''? 代码:
用ACCESS数据库,读出某字段值,如果为空值,故得值为null,但欲与某edit.text相比较,运行时,将会出错。用何方法将读出的字段值规范为string类型,如果其值为null,则自动规范化为''? 代码:
T twos Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-29 #2 fields.isnull可以判断是不是null 如果是null你可以做特殊处理 用一个条件语句分开处理就可以了
F forgot2002 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-29 #3 if fieldbyname('XXX').IsNull then fieldbyname('XXX').AsString:=''; 还有,请注意换行,累死人了!
X xianjun Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-29 #4 直接用fieldbyname('FIELD').AsString就行了。
W winlmp Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-29 #5 //函数作用: 若v是Null 则返回 defaultstr,否则直接返回原来的值 function isNullStr(v:Variant;defaultstr:string):string; begin if varIsNull(v) then result:=defaultstr else result:=v; end; //调用例子 if edit1.text=isnullstr(Table1['字段名'],'') then showmessage('edit1框中不可为空!');
//函数作用: 若v是Null 则返回 defaultstr,否则直接返回原来的值 function isNullStr(v:Variant;defaultstr:string):string; begin if varIsNull(v) then result:=defaultstr else result:=v; end; //调用例子 if edit1.text=isnullstr(Table1['字段名'],'') then showmessage('edit1框中不可为空!');
S svw0506 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-29 #6 if query1.FieldByName('aaa).AsString=Edit1.Text then 用这种方法不会出错