D
delphiroad
Unregistered / Unconfirmed
GUEST, unregistred user!
var
pp
char;
ss:string;
begin
pp:='12345';
ss:=pp;//不会出错
end;
var
ppchar;
ss:string;
begin
ss:=pp;//要出错，Access violation at address之类的错误
end;
现在的问题是，怎么判断pp是无效的？我用了Assigned函数，但不行，因为pp不是nil
注：实际的情况中，由于pp是另一个组件的属性，我也无法修改原代码，所以我根本无法使用类似pp:=nil之类的方法来给它初始化。只能是判断了。
pp
char;ss:string;
begin
pp:='12345';
ss:=pp;//不会出错
end;
var
pp
char;ss:string;
begin
ss:=pp;//要出错，Access violation at address之类的错误
end;
现在的问题是，怎么判断pp是无效的？我用了Assigned函数，但不行，因为pp不是nil
注：实际的情况中，由于pp是另一个组件的属性，我也无法修改原代码，所以我根本无法使用类似pp:=nil之类的方法来给它初始化。只能是判断了。