2014年5月29日
处理空值转换字符串的问题 nulltostring
摘要： function NullToSpace(V: OleVariant):String;var S: String;begin if VarIsNull(V) then S := ' ' else S := V; Result := S;end;function NullToZero(V: Ol... 阅读全文
posted @ 2014-05-29 11:50 步三少 阅读(5666) 评论(0) 推荐(0) 编辑