当前位置:主页>仓库管理软件> 列表

简单问题,请教各位大富翁。 找网吧桌面管理软件

财务软件版1楼: 1、Øø,这样的符号,放到access表中,用delphi显示在dbgrid中是小问号,如何处理?
2、if adoquery1[''fld1'']<>null then label1.caption:=adoquery1[''fld1''],在处理空值时,如上写,真的很烦,有没有好的办法?

2楼: 2. IFELSE 如网吧桌面管理软件

3楼: 1、字符集问题;
2、用For循环既可!
...
for I := 0 to ADOQuery.RecordCount - 1 do
begin
if not ADOQuery.Fields[I].IsNull then
for J := 0 to aParentControl.ControlCount - 1 do
begin
if aParentControl.Controls[J].ClassNameIs(''TLabel'') then
TLabel(aParentControl.Controls[J]).Caption := ADOQuery.Fields[I].AsString;
end;
end;
...

4楼: 我也感觉是字符集问题,如何解决?
另外,edit1.text:=format(''%8.2f'',adoquery1[''fld'']),不成,我应该如何写。
请举例format的用法。
Johnny_du,那个循环太复杂吧?

5楼: label1.caption:=vartostr(adoquery1[''fld1'']);

6楼: 这个循环应该不复杂的!虽然循环次数稍多,但是这可能是比较好的解决途径(因为只要写一次代码既可...);
Format函数例子:
label1.caption := Format(''this is a Float Number: %8.2f'',[22.222222]);

财务软件版7楼: Thank you! Johnny_du;
但是我感觉不是很好。
哪位给写个函数吧,
如果是字符,空值时返回‘’;
如果是数字,空值时返回0之类的,我不会写这样的东西。

字符集如何解决,我目前还未解决这个。

8楼: 好象大家都去回答难问题了,对简单的总是不屑一顾。