C
cyf_00002
Unregistered / Unconfirmed
GUEST, unregistred user!
各位前辈好:
我是个delphi的初学者,
希望各位前辈能多多帮忙。
问题如下:
定义记录:
type
pdata=^nodedata;
nodedata=record
value:string;
wjbm:string;
sq:string;
end;
添加树节点:
var
nodx :ttreenode;
p1data;
begin
nodx:=treeview1.selected;
new(p1);//(应该是new的错误)
p1^.value='1';
p1^.wjbm='1 ';
p1^.sq='1';
nodx=treeview1.items.addchildobject(nodx,'实验',p1);//(在此产生异常)
end;
奇怪的问题
在别处写的代码运行的很正常,但在此处产生异常,说是new产生的地址不能写,我很纳闷
希望各位大侠帮帮忙
哈
以前在PB里面也遇到过这类问题 在别处的代码在这里就不行 哈
我是个delphi的初学者,
希望各位前辈能多多帮忙。
问题如下:
定义记录:
type
pdata=^nodedata;
nodedata=record
value:string;
wjbm:string;
sq:string;
end;
添加树节点:
var
nodx :ttreenode;
p1data;
begin
nodx:=treeview1.selected;
new(p1);//(应该是new的错误)
p1^.value='1';
p1^.wjbm='1 ';
p1^.sq='1';
nodx=treeview1.items.addchildobject(nodx,'实验',p1);//(在此产生异常)
end;
奇怪的问题
在别处写的代码运行的很正常,但在此处产生异常,说是new产生的地址不能写,我很纳闷
希望各位大侠帮帮忙
哈
以前在PB里面也遇到过这类问题 在别处的代码在这里就不行 哈