让函数返回一个数组,这样为什么不行?

delfans 2001-06-19 11:38:00
Function SplitString(strString:string):array of string;

[Error] sp_Proc.pas(18): Identifier expected but 'ARRAY' found
...全文
127 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
wonderxin 2001-06-19
  • 打赏
  • 举报
回复
知错!
Crob 2001-06-19
  • 打赏
  • 举报
回复
to wonderxin(www.tibetin.com) 
这样也可以吗????
应该是
type a1 = array of char;
Function SplitString(strString:string):a1;

另外如果是动态数组还要将数组的大小一块返出来,可以做成结构体返回。
不过遇这种问题通常我会返回一个指针。
如:

type
tagArr = record
p : pointer; //或array of .....
size : integer;
end;


Function SplitString(strString:string) : tagArr;
//.....
wonderxin 2001-06-19
  • 打赏
  • 举报
回复
a1:array of string;
Function SplitString(strString:string):a1;
Jera 2001-06-19
  • 打赏
  • 举报
回复
给分啦 :)
Jera 2001-06-19
  • 打赏
  • 举报
回复
Function aaa:OleVariant
begin
result:= VarArrayCreate([0,2],varVariant);
result[0]:='1234567';
result[1]:='adsfasdf';
result[2]:='asdfasdf';
end;


调用:

var
aVariant:OleVariant;
begin
aVariant:=aaa;
showmessage(aVariant[2]);
end;

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧