。
。
。
。
len:=36;
time5:=' '+Time4;
if Length(Names)<=len then
begin
for i:=1 to len-Length(Names) do
begin
time5:=' '+time5;
end;
end
else if Length(Names)>len then
begin
delete(Names,len-3,Length(Names));
names:=Names+'..';
time5:=' '+time5;
end;
Result:=Names+Time5;
。
。
。
我想让result:=歌曲名+一定数量的空格+时间,从而使他们在listbox中时间列排列整齐,可是当names中有英文的时候空格数就不对。这是为什么?
。
。
。
len:=36;
time5:=' '+Time4;
if Length(Names)<=len then
begin
for i:=1 to len-Length(Names) do
begin
time5:=' '+time5;
end;
end
else if Length(Names)>len then
begin
delete(Names,len-3,Length(Names));
names:=Names+'..';
time5:=' '+time5;
end;
Result:=Names+Time5;
。
。
。
我想让result:=歌曲名+一定数量的空格+时间,从而使他们在listbox中时间列排列整齐,可是当names中有英文的时候空格数就不对。这是为什么?
解决方案 »
- 请教高手,如何实现MSN主界面左上角的"隐藏/显示窗口框架"功能???
- 请问程序中用了DBF数据库,若在没装Delphi的机器上运行,老出错是怎么回事啊?
- delphi中adostorproc,sql语句的问题.想的头发都白了
- 如何判断鼠标左键是否按下(或者右键)。
- 如何在delphi程序中调用.chm的帮助文件?
- 怎样判断用户是否用的是没级科目
- 请教:在SQL SERVER2000里面怎样让值显示为******?
- 各位高手,有关windows的mediaplay播放问题,请求援助!!
- 请问如何用SQL语句计算一列数据,并把结果赋给一个变量
- 我使用ADO连接提示“验证失败”,请看详请...
- temptable:TTable 中,temptable表他们的列名怎么用中文显示出来
- 大学毕业,心酸,散分
ANSI, MBCS ANSI, etc.WideString ~2^30 characters 4 bytes to 2GB Unicode characters; multi-user servers and multi-language applications
如果方便,请帮我儿子投一票
http://www.nutricia.com.cn/view.asp?id=736
谢谢。