关于out 参数。 ( 积分: 50 )

楞

楞头青

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #1

我调用一个函数，很简单的
function SelectDirectory(const Caption: string
const Root: WideString;
out Directory: WideString): Boolean;

开是调用
var
strDirectory:String;

wstrRoot:String;
begin
SelectDirectory('Please Select Directory',wstrRoot,strdirectory);


可是编译通不过， Types of actual and format var parameters must be identical

谁知道为什么？

 

楞

楞头青

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #2

我调用一个函数，很简单的
function SelectDirectory(const Caption: string
const Root: WideString;
out Directory: WideString): Boolean;

开是调用
var
strDirectory:String;

wstrRoot:String;
begin
SelectDirectory('Please Select Directory',wstrRoot,strdirectory);


可是编译通不过， Types of actual and format var parameters must be identical

谁知道为什么？

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #3

他要求是widestring，那么strdirectory就必须用widestring类型

 

W

wangergulei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #4

var
strDirectory:WideString;
wstrRoot:string;
begin
SelectDirectory('Please Select Directory',wstrRoot,strdirectory);
end;
把strDirectory改成WideString类型的就可以了。

 

楞

楞头青

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #5

早试过了，不行，按理说string类型也可以的，我用的是delphi7

 

A

aafly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #6

SelectDirectory('Please Select Directory',wstrRoot,out strdirectory);
这样调用，试一试

 

楞

楞头青

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-03-18

• #7

现在又可以了，不知道是不是编译器的毛病

thanks for all.