库存管理软件版1楼: 关于数组的一个问题：
如果数组是字符常量，如何初始化该数组？
比如：如果数组为（D，R，E，W，Q，M，H，J，G，F，L），如何简单初始化？
这个问题对高手很简单。可我不熟悉，
多谢了！

2楼: const chr:array [0..11] of char=＇＇DREWQMHJGFL＇＇; 如管家婆软件下载

3楼: 你的语句直接赋值，如何取出值来呢？
本想：
cha[0..10]:=(D,R,E,W,Q,M,H,J,G,F,L);
可测试似乎通不过。怎么办？

4楼: const
chr: array[0..1] of string = (＇＇D＇＇, ＇＇R＇＇);
这是可以的.但是不知道是否你想要的

5楼: To: skyccf，谢谢你。
我的问题说得不很确切。 抱歉。
我的数组中每个元素都是字符串，且数组每个元素长度不定，但元素是确定的，该数组如何初始化呢？
比如一周七天的单词？

6楼: to lczh8420,skyccf:谢谢二位。
你们前面的答案我测试都可以。
对我上面一个提问呢？该如何解决？

库存管理软件版7楼: var
s:string;
cha:array[0..10] of char;
begin
s:=＇＇winodws＇＇;
strpcopy(cha,s);//注S的长度不要超cha的长度
showmessage(cha);
.......

8楼: 好象我的问提说得不清楚；
比如：Monday....Sunday这七个单词，作为一个数组，然后用循环赋值给一个ComboBox组件，用代码如何实现？这只是一个例子。
谢谢！
在线等！

9楼: 谢谢大虾们。请谅新手无知，但诚请教！
急

10楼: const
MyStrs:array[0..2] of String=(＇＇aaa＇＇,＇＇b＇＇,＇＇Hello!＇＇);

procedure TForm1.Button1Click(Sender: TObject);
var
i:Integer;
begin
with ComboBox1.Items do
begin
Clear;
for i:=Low(MyStrs) to High(MyStrs) do
Add(MyStrs[i]);
end;
end;

11楼: To creation-zy:
谢谢.通过！[:I]

12楼: 多人接受答案了。 如用友企业管理软件