这是过程:param2是个数组类型,如何定义?
procedure Tinsertobj.Method1(const vdatas: WideString;
var Param2: 数组);<----
begin
end;这是调用过程,传10个数
procedure TForm1.Button1Click(Sender: TObject);
var
zxs:array[1..10] of string;
begin
zxs[1]:='江苏';
zxs[2]:='浙江';
zxs[3]:='安徽';
zxs[4]:='河北';
zxs[5]:='山西';
zxs[6]:='内蒙';
zxs[7]:='辽林';
zxs[8]:='吉林';
zxs[9]:='黑龙江';
zxs[10]:='福建';
ecook.Method1('dd',这里数组怎么写?);
end;
procedure Tinsertobj.Method1(const vdatas: WideString;
var Param2: 数组);<----
begin
end;这是调用过程,传10个数
procedure TForm1.Button1Click(Sender: TObject);
var
zxs:array[1..10] of string;
begin
zxs[1]:='江苏';
zxs[2]:='浙江';
zxs[3]:='安徽';
zxs[4]:='河北';
zxs[5]:='山西';
zxs[6]:='内蒙';
zxs[7]:='辽林';
zxs[8]:='吉林';
zxs[9]:='黑龙江';
zxs[10]:='福建';
ecook.Method1('dd',这里数组怎么写?);
end;
解决方案 »
- 代替showmodal其他两种方法和showmodal各有什么优缺点?
- access数据库 空字符串选择问题
- 紧急求助!!怎么把一个form设置成一个project的main form
- 三层,客户端调用存储过程
- 拖动Panel改变大小时,当Panel增大到一定程度时就不能再变大了,如何让它可以无限变大?
- 如何更改Object Inspector对象面板的默认设置
- 请教有关TQuery控件遇到的问题!谢谢!
- 请教!帮助看一段程序,奇怪,此段程序执行时,竟然没有错误,是关于SQL SERVER存储过程的..
- 请问怎样利用delphi进行B/S结构的数据库开发啊
- 将use unit1写在接口部分与实现部分有何区别.
- dao问题dao问题
- 100分求教!CPU序列号是否唯一?怎样读取?
TProvince=array of string;
procedure SetValue(Aprov: TProvince);
begin
SetLength(Aprov,11);
Aprov[0] := 11;//size of array
Aprov[1] := '江苏';
.....
end;