以下C的定义，在DEPLHI里如何定义 (200分)

localboy · 2003-02-24

函数A（CHAR *A，UNSIGNED CHAR *B，INTEGER C，INTEGER *D ，UNSIGNED CHAR *E，INTEGER *F）
其中 E、F 是需返回的

xyl999 · 2003-02-24

A(A, B, E: Pchar
C: integer
D, F: ^integer)

ghosts · 2003-02-24

localboy · 2003-02-24

需要返回值的不用加上VAR吗？另外，我曾用
STRING 来替代CHAR *A，可以，但在最近的使用中，则只能用WIDESTYRING，否则会出错！

Cut.fei · 2003-02-24

直接定义成Delphi的过程就可以实现：
procedure myA(A,B

Char;C,D:integer;var E: PChar;var F : integer);

localboy · 2003-02-24

^integer好象DELPHI不认啊！

a_mao_gong · 2003-02-24

A(A, B

char
C: integer
D: Pinteger
var E: Pchar
var F: Pinteger);

localboy · 2003-02-24

TO Cut.fei,
这样的定义方法我早试了，不行啊！？

tseug · 2003-02-24

function MyA(var A: Char
var B: Byte
C: Integer
var D: Integer
var E: Byte
var F: Integer): Integer;
或者是Procedure

localboy · 2003-02-24

多谢各位相助，在各位的帮助下，小弟试了试
可以用以下定义通过！
函数A（CHAR *A，UNSIGNED CHAR *B，INTEGER C，INTEGER *D ，UNSIGNED CHAR *E，INTEGER *F）
function (a:string;b,e

char;c,d;integer;F

integer);
function (a

CHAR;b,e

char;c,d;integer;F

integer);
widestring还是不行啊！

localboy · 2003-02-24

多人接受答案了。