简单问题 ( 积分: 50 )

G

gone_1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-16

• #1

我在调用函数
lin:string;
mydb_formatnextline(lin)时出现错误，
types of actual and formal var parameters must be identical.
函数的参数是个 variable (var) parameters。

 

G

gone_1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-16

• #2

我在调用函数
lin:string;
mydb_formatnextline(lin)时出现错误，
types of actual and formal var parameters must be identical.
函数的参数是个 variable (var) parameters。

 

Z

ZBJ2001_KF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-16

• #3

你要写全.如果从你现在写的看.

你应该是VAR LIN:STRING;
BEGIN

END;

我测试一下.通过
procedure TForm1.Button1Click(Sender: TObject);
VAR
ST:STRING;
begin
LS(ST);

end;

procedure TForm1.LS(var STR: STRING);
begin
STR:='ZBJ'+STR;
end;

 

W

windstopped

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-16

• #4

看不明白

 

J

Jonson_sunshine

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-16

• #5

函数的参数类型定义与你的lin类型不一致，检查函数的参数类型定义。
当函数参数为引用类型变量的情况下，如procedure mydb_formatnextline(var A:xtype)，
你的变量lin与A的类型xtype不一致，就可能导致这个问题（这种提示）。
需确保var lin :xxx;的xxx与函数参数xtype一致。

 

G

gone_1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-17

• #6

to Jonson_sunshine:
问题就在这里，
函数的声明是
procedure mydb_formatnextline(var lin:string)，
所以我不明白，是不是delphi的问题。

 

G

gone_1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-08-17

• #7

噢，明白了。