K
kingbenz
Unregistered / Unconfirmed
GUEST, unregistred user!
我在一個新建工程中用GetClass可以返回到正確的類名，但在一個比較龐大的程序中卻返
回Nil，問GetClass會和什麼有沖突嗎？如何解決？
var
Child: TForm;
cClass:TClass;
begin
registerClass(TForm2);
cClass:=GetClass('TForm2');
if cClass <>nil then
showmessage('TForm2');
end;
回Nil，問GetClass會和什麼有沖突嗎？如何解決？
var
Child: TForm;
cClass:TClass;
begin
registerClass(TForm2);
cClass:=GetClass('TForm2');
if cClass <>nil then
showmessage('TForm2');
end;