Y
yancaoshi
Unregistered / Unconfirmed
GUEST, unregistred user!
我想做的一个链表,不过每个节点用的不是记录,而是类,里面需要实现一些自己的方法。我在连接的时候发现不知道怎么做了。
下面是我定义的类:
type
TTest = class
name: string;
value: integer;
{…………这里是我的一些方法…………}
end;
PTest = ^TTest;
在过程中我是这样的:
var
P: PTest;
begin
New(P);
P^.name := 'first';//这句错了
{…………想做的其它事…………}
end;
我New出一块空间用于保存我想要的数据,然后想进行操作就出错了。如果用record而不用class的话就没问题。我知道class需要创建,但是我这个子过程中用TTest.Create创建的话怎么把此空间里的数据保存到我New出来的地方呢?
写得糊涂了,我是不是绕进去了?谢谢大家回复啦
下面是我定义的类:
type
TTest = class
name: string;
value: integer;
{…………这里是我的一些方法…………}
end;
PTest = ^TTest;
在过程中我是这样的:
var
P: PTest;
begin
New(P);
P^.name := 'first';//这句错了
{…………想做的其它事…………}
end;
我New出一块空间用于保存我想要的数据,然后想进行操作就出错了。如果用record而不用class的话就没问题。我知道class需要创建,但是我这个子过程中用TTest.Create创建的话怎么把此空间里的数据保存到我New出来的地方呢?
写得糊涂了,我是不是绕进去了?谢谢大家回复啦