Delphi中如何实现传递指针?(100分)

J

jingtao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #1

Delphi中如何实现传递指针?
比如说
function My_ChangeInt(i:^integer):Boolean;
但是好像无法编译?

 

Q

qdyoung

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #2

function My_ChangeInt(var i:integer):Boolean;
begin
i := 2;
end;

My_ChangeInt(i);
后i =2

-----
http://www.8421.org

 

M

mlzhou

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #3

type
TPinteger:^integer;
........
function My_ChangeInt(var i:TPinteger):Boolean;

 

悲

悲酥清风

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #4

这样：
type PInt=^integer;

function My_ChangeInt(iInt):Boolean;

 

悲

悲酥清风

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #5

mlzhou在我先提交了：）

 

J

jingtao

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-23

• #6

已经自己解决了.
呵呵.
分数还是给
一段时间没有用D了.所以习惯了C的方式.