如何聲明一個字符串數組常量(20分)

L

leway

Unregistered / Unconfirmed
GUEST, unregistred user!
const //保存着必要的数据文件列表
DataFileLists:array[0..7] of string=('TblClipBoard.DAT','tblClipBoardCtl.DAT',
'TblCodeComplete.DAT','tblCodeHint.DAT','tblFunc.DAT','tblOptions.DAT',
'tblProject.DAT','tblUnits.DAT');
 
需要变化这样也可以:
Var
DataFileLists:Variant;
begin
DataFileLists:=VarArrayof(['TblClipBoard.DAT','tblClipBoardCtl.DAT',
'TblCodeComplete.DAT','tblCodeHint.DAT','tblFunc.DAT','tblOptions.DAT',
'tblProject.DAT','tblUnits.DAT']);
DataFileLists就可以象数组一样用。
需要时再用VarArrayof改变其元素的值
 
多人接受答案了。
 

Similar threads

回复
0
查看
854
不得闲
S
回复
0
查看
949
SUNSTONE的Delphi笔记
S
S
回复
0
查看
770
SUNSTONE的Delphi笔记
S
顶部