DB数据库中的字符串字段转换为字符串时如何保留空格?以利于排版?(100分)

  • 主题发起人 主题发起人 jw
  • 开始时间 开始时间
J

jw

Unregistered / Unconfirmed
GUEST, unregistred user!
以FieldByName('MyField').AsString转换,若字段字符未满,则空格均被消除,要如何保留呢?
112@telekbird.com.cn
1999.11.10
 
没用过Paradox数据库,自己添加空格不行吗?
var si:word;
str:string;
begin
str:=query.FieldByName('MyField').AsString;
si:=query.FieldByName('MyField').size;
str:=str+stringofchar(#32,si-length(str));
 
不明白是何意?
 
try this:
TStringField(query.fieldbyname('myfield')).FixedChar:=true;
str:=TStringField(query.fieldbyname('myfield').value;
 
假设字段宽度为C,字段名为'F'
I:String
I:= table1.Fieldbyname('f').Asstring;
while length(i) < C then
i := i+' ';
 
cAKK 的答案应该是对的,我曾经用过。
 
若以空格来充数时,还有个问题呢!
你的字段一定需要程序来读,当处理程序运行在不同的字体、字号下,该字段
的空格也不一样宽,若用它制表,则有可能使格线重不齐。
按Cakk的方法,但填空格时用"."/"-"等来代替。程序处理时再去掉。
 
jw提的问题很好。
实际上字符型字段在存储时就已将后继空格去掉啦。
 
看是什么数据库了,Access就可以保存后继空格.
 
若只显示,用TField.DisplayFormat试一试
 
多人接受答案了。
 
后退
顶部