result:array[1..37] of TStrings;
for i:=1 to 37 do
result[i].creat;有什么问题吗,怎么提示有地址冲突
for i:=1 to 37 do
result[i].creat;有什么问题吗,怎么提示有地址冲突
解决方案 »
- 谁能给出一个判断字符串编码(codepage,如简体936)的代码?
- listbox出现list index out of bounds错误,求解?在线等、、、
- 一个封装mysql的sdk 支持最新mysql版本
- 请教高手,注册表里二进制值的编辑框是用什么控件做的?有第三方控件吗?如何编辑呢?
- 大家谁知道DelPhi中自带的InterBase庫怎么用???
- 多表更新问题?
- 三层结构客户端调用ApplyUpdate(-1)有问题
- 疑惑,关于SQL中的字符串问题
- 怎样把程序发布啊,我的D版delphi6内的install shield for delphi安装不了啊,怎么办啊
- AdoTable.Filter与like语句问题
- 如何解决ctrl+Alt+Del后钩子失灵的问题?
- 如何用socket实现文件的传输
var
sl: TStrings;
Value: string;
Index: Integer;
begin
sl := TStringList.Create; //建立
try
sl.Add('a01=1'); //装数
sl.Add('d01=17');
sl.Add('ss1=''xxk'''); Value := sl.Values['ss1'];//按名字取数
ShowMessage(Value); Index := sl.IndexOf('d01=17'); //査某行
ShowMessage('第'+IntToStr(Index) + '行');
finally
sl.Free
end;
end;(注:TStrings是个抽象虚类,TStringList为其子类实现了TStrings中的抽象方法)
2. 构造函数是类方法而不是对象的方法,调用TStringList.Create方法,而不是数组中的对象。
Java的vector就相当于Delphi中的动态数组