张
张校风
Unregistered / Unconfirmed
GUEST, unregistred user!
例如对异常对象来说:
type myException=class(Exception)
...
end;
procedure a;
begin
raise e.create('error');
end;
procedure b;
begin
try
a;
except
on e:myException do
begin
showmessage(e.message);
//这里使用完毕后需要e.free()吗?
end;
end;
end;
type myException=class(Exception)
...
end;
procedure a;
begin
raise e.create('error');
end;
procedure b;
begin
try
a;
except
on e:myException do
begin
showmessage(e.message);
//这里使用完毕后需要e.free()吗?
end;
end;
end;