在VC中: void fun(char *str[],int varcount);在Delphi中:type
PVarStr = TVarStr;
TVarStr = array[0..255] of char;// 这个地方要看你的字符串最长有多长procedure fun(varstr: PVarStr;varcount: Integer);cdecl;
在delphi中调用:
var
varstr: array[0..9] of TVarStr;begin
fun(@varstr[0],10);
end;
我没试过,应该行的。
PVarStr = TVarStr;
TVarStr = array[0..255] of char;// 这个地方要看你的字符串最长有多长procedure fun(varstr: PVarStr;varcount: Integer);cdecl;
在delphi中调用:
var
varstr: array[0..9] of TVarStr;begin
fun(@varstr[0],10);
end;
我没试过,应该行的。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货