字符数组的，帮忙一下！我想了好几天了！！！！(100分)

H

happen_nt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #1

我想写个函数
首先我定义了大概144个字符常量，每个常量大概200个中文字符，定义在RESOURCESTRING中的
能否象数据库一样，输入一个数字，即得到一个字符常量。
既 输入1-- --------->S1
2------------>S2
我想把这些定义为一个字符数组，可不知道如何下手，给点意见。谢谢。
函数类似function output(i:integer):string;

 

L

lldhz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #2

这样可以吗：
function output(i:integer):string;
tpye strarray array[1..144] of string ;
const s:strarray = ('abcd','edfr'……);
begin

result := s;
end;

 

G

giveup

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #3

既然已经定义在RES中了，还换为字符数组做什么？直接LoadStringFromRes

 

U

ugvanxk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #4

loadstr(i)

 

H

happen_nt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #5

那用字符字典来，这样是否消耗内存很大！
机定义过程来给数组负值

 

H

happen_nt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-11-13

• #6

那如果我定义的字符常量大于255个字符，应该怎么运用WIDESTRING