5,392
社区成员
发帖
与我相关
我的任务
分享一个简单问题，希望兄弟帮忙，来者有分..............神啊，救救我吧!!
var
PTinteger=^integer;
nummb:ptinteger;
begin
.....
//如何调用已经经过处理的nummb值,说说原理或作用，多谢UP者
end;
PTinteger=^integer;
nummb:ptinteger;
begin
.....
//如何调用已经经过处理的nummb值,说说原理或作用，多谢UP者
end;
...全文
请发表友善的回复…
发表回复
lance09 2002-08-09
- 打赏
- 举报
多谢
lyfzjl 2002-07-31
- 打赏
- 举报
up up up
xlshcn 2002-07-31
- 打赏
- 举报
如果有类型T，那么
type
P=^T;
定义了一个指向这个类型的指针类型P。
var
TP:P;
定义了一个指针变量。
使用时TP^解除引用，相当于原来的类型。
可以用NEW分配内存：
NEW过程形式：
TYPE
PInteger=^Integer;
VAR
pi:PInteger;
BEGIN
New(pi);
...
Dispose(pi);
END;
NEW函数形式：
BEGIN
pi=New(pi);
...
Dispose(pi);
END;
访问时可以这样：
var
i:Integer;
begin
i:=pi^;
pi^:=i;
end;
对于取地址操作，可以写：
pi:=@i;
type
P=^T;
定义了一个指向这个类型的指针类型P。
var
TP:P;
定义了一个指针变量。
使用时TP^解除引用，相当于原来的类型。
可以用NEW分配内存：
NEW过程形式：
TYPE
PInteger=^Integer;
VAR
pi:PInteger;
BEGIN
New(pi);
...
Dispose(pi);
END;
NEW函数形式：
BEGIN
pi=New(pi);
...
Dispose(pi);
END;
访问时可以这样：
var
i:Integer;
begin
i:=pi^;
pi^:=i;
end;
对于取地址操作，可以写：
pi:=@i;
lance09 2002-07-31
- 打赏
- 举报
真的没有什么好的解决办法吗
YewPu 2002-07-31
- 打赏
- 举报
up
lance09 2002-07-31
- 打赏
- 举报
没有好的办法吗，兄弟们，帮个忙吧
jerrymousenet2 2002-07-30
- 打赏
- 举报
PTinteger=^integer;//声明用
nummb:ptinteger;
AInt := numb^;//取值用
up
nummb:ptinteger;
AInt := numb^;//取值用
up
yoisyois 2002-07-30
- 打赏
- 举报
呵呵，我也是混子！：）
jackie168 2002-07-30
- 打赏
- 举报
混分
UP
UP
hellenlong 2002-07-30
- 打赏
- 举报
把程序帖出来看看
Gahal 2002-07-30
- 打赏
- 举报
up
dreamtou 2002-07-30
- 打赏
- 举报
up
lance09 2002-07-30
- 打赏
- 举报
好象不是呀，我现在是
new(mb);
.....
dispose(mb);
也同样报非法指针操作
new(mb);
.....
dispose(mb);
也同样报非法指针操作
hellenlong 2002-07-29
- 打赏
- 举报
指针没有初始化啊,当然保错了.
应该给指针分配内存
应该给指针分配内存
lance09 2002-07-29
- 打赏
- 举报
多谢
realist 2002-07-29
- 打赏
- 举报
不太会，帮你up一下
lance09 2002-07-29
- 打赏
- 举报
如何????
wrsy 2002-07-26
- 打赏
- 举报
up
tangss 2002-07-26
- 打赏
- 举报
帮你UP!
FY2693 2002-07-26
- 打赏
- 举报
木瓜掉进了井里,
up
up
加载更多回复（21）
