如何将Tstringlist中的一个项分解成字符串（急！！！！！！！！！！！！！） ( 积分: 92 )

B

Beyond03615

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-04-28

• #1

各位大侠：
小弟有一个问题，就是如何将Tstringlist类型的变量中的某一下分解
如：
a:Tstringlist;
将某一项如a[2]的字符串长度限定在10个以内如何实现

 

H

helloqiner

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-04-28

• #2

a[2] := copy(a[2], 1, 10);

 

H

hyxic

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-04-28

• #3

a[2]:='十个字符'

 

F

fred_jing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-04-28

• #4

a := copy(a ,1 ,10)

 

L

lisongmagic

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-06

• #5

if length(a)>10 then
a:= copy(a,1,10);
为什么有这样的需求,感觉好别扭;

如果经常有这样的长度限定,
为什么不用二维数组呢.

 

L

lisongmagic

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-11

• #6

真无聊。。。

 

墨

墨剑

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-11

• #7

估计是我道行太浅看不懂?

 

H

hs-kill

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-12

• #8

看着好奇怪啊......就像lisongmagic说的，还不如用2维数组呢

能不能说说你为什么要这么做啊，看看有没有其他省事的解决办法

 

B

bbscom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-12

• #9

// 分解实例
procedure TForm1.Button1Click(Sender: TObject);
var
A:TStringList;
begin
A:=TStringList.Create;
A.Delimiter:=',';
A.DelimitedText:='11,22,33,44,55,66';
ShowMessage(A.Text);
A.Free;
end;

 

H

helloqiner

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #10

我理解这样的需求你是否可以声明一个结构体而不用 TStringList
例如：
TRecord = record
caption : String;
name: String[10]
//限定只能在 5 个字符以内。
....
end;

 

白

白河愁

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #11

name: String[10]
//限定只能在 5 个字符以内。
这样是错误的

name: String[11]
//限定只能在 5 个字符以内。
才对

 

Z

ZBJ2001_KF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #12

楼上的测试过吗？ String[11]?

 

A

agang200008

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-06-08

• #13

name: String[10] //怎么不是限定在10字符以内？