服务端过程如下:
procedure Tinsertobj.Method1(const vdatas: WideString; Param2: OleVariant);
begin
end;
//param2接受数组
客户端发送
procedure TForm1.Button1Click(Sender: TObject);
var
zxs: olevariant; //如果array[1..10] of string;会报类型不对的错array与olevariant不同
begin
zxs[1]:='江苏';
zxs[2]:='浙江';
zxs[3]:='安徽';
zxs[4]:='河北';
zxs[5]:='山西';
zxs[6]:='内蒙';
zxs[7]:='辽林';
zxs[8]:='吉林';
zxs[9]:='黑龙江';
zxs[10]:='福建';
ecook.Method1('dd',zxs);
end;报错:invalid argument!
procedure Tinsertobj.Method1(const vdatas: WideString; Param2: OleVariant);
begin
end;
//param2接受数组
客户端发送
procedure TForm1.Button1Click(Sender: TObject);
var
zxs: olevariant; //如果array[1..10] of string;会报类型不对的错array与olevariant不同
begin
zxs[1]:='江苏';
zxs[2]:='浙江';
zxs[3]:='安徽';
zxs[4]:='河北';
zxs[5]:='山西';
zxs[6]:='内蒙';
zxs[7]:='辽林';
zxs[8]:='吉林';
zxs[9]:='黑龙江';
zxs[10]:='福建';
ecook.Method1('dd',zxs);
end;报错:invalid argument!
解决方案 »
- 大家是否使用包封装数据模块?
- 如何查询取出分类的最下层
- 如何将格式化的文本文件转为excel文件?如何将access转为excel?
- 请教使用DBGIRD的高手中的高手,关于DBGRID的事件的问题,大家都来参与哦!
- 請幫忙把VB代碼轉換為Delphi
- 求图标下载
- 紧急求助!关于dbcombobox
- 如何把ADOconnection组件的connectionstring字符串写成ini文件?
- 高分求答!如何把20万条数据在45分钟内从一个文本文件导入数据库?在线等候!
- DUnit单元测试工具哪里有下载,请指示,十万火急!
- 怎么在DBGrid1+ADOQuery1里动态添加一个由其他字段计算出来的字段???
- 我用D5做了一个含有自动完成功能的combobox控件,点击listbox中的候选项时报错,代码如下:
服务端再对Param2进行处理。