数在据集ADOQuery中有下面的四个字段:商品名称 数量 单价 金额。如何在Memo中,把他们格式化为如下的文本格式:商品名称 数量 单价 金额
fddsaff 1 10.00 10.00
旺仔小馒头 1 5.00 5.00所有数据右端对齐,同时:数量对齐数量列,单价对齐单价列,品名对品名列?
fddsaff 1 10.00 10.00
旺仔小馒头 1 5.00 5.00所有数据右端对齐,同时:数量对齐数量列,单价对齐单价列,品名对品名列?
解决方案 »
- delphi
- 问几个设计的问题,说说大家都是怎么做的
- 急呀!各位救救我呀。关于添加vcl控件。
- 如何把数据导入WORD
- delphi6.0+Interbase6.5(dielect 1->dialect 3)
- 紧急求教:ScktSrvr(Borland Socket Server)设置问题?????????
- imageenview画直线
- 论坛初建,欢迎去灌水!!!http://delphiworld.onchina.net
- 我做的这个软件只卖10元(源代码),大家必须邮寄。(收到该软件的源代不许供开,否则追究法律责任)朱小军方言
- !!!socket问题
- 主程序如何传递登陆信息及数据库连接COnnection信息传给DLL
- DBChart 怎么把线清除掉
fddsaff 1 10.00 10.00
旺仔小馒头 1 5.00 5.00格式化类似这样的形式。
比如
format('%12s %8s %8s %8s',['商品名称',' 数量',' 单价',' 金额']);
建议四个字符组成一条字符串,每个字符取定长(大于原字条长度),这样显示既好看又整齐。如下:商品名称 数量 单价 金额
fddsaff 1 10.00 10.00
旺仔小馒头 1 5.00 5.00repeat
S:=s+' '; // 尾部增空格
until length(s)>10;
或
while length(s)<10 do
S:=' '+S; // 首部增空格最后:
s:=s1+s2+s3+s4;
一个是左补空格,一个是右补空格
无须自己循环补空格
而且关键问题sz_haitao也给出了答案。