为什么在我的项目 RegisterClass 都不起作用,不管是写在 Initialize、Formcreate还是函数体内,都不生效。 而我另做一个单窗口项目,是可以生效的,一旦把工程中的其它文件加进来,就失效了。有哪位朋友遇到过这个问题吗,SOS!高分相送!

解决方案 »

  1.   

    楼主没说清具体情况..
    只能大致开个药方:
    PROJECT选项==>PACKAGES==>选中BUILD WITH RUNTIME PACKAGES
    在下面只留下VCL.BPL带着发布.
      

  2.   

    不选中BUILD WITH RUNTIME PACKAGES,也应该没问题吧
      

  3.   

    跟代码没关系,不管怎么简单的代码,都不行  比如
    RegisterClass('TForm');
    FindClass('TForm');
    UnRegisterClass('TForm') 就提示  EClassNotFound Message "Class TForm 不存在"
      

  4.   

    跟代码没关系,不管怎么简单的代码,都不行  比如
    RegisterClass('TForm');
    FindClass('TForm');
    UnRegisterClass('TForm') 就提示  EClassNotFound Message "Class TForm 不存在"
    ----------------------------------------------------
    这个不好吧,你应该使用其它的类名
      

  5.   

    RegisterClass(TForm);
    FindClass('TForm');
    UnRegisterClass(TForm);
      

  6.   

    RegisterClass('TForm');
    你想注册个字符串?
      

  7.   

    哈哈 procedure RegisterClass(AClass: TPersistentClass)
    我想应该先看看 Delphi的帮助  例如   TMyForm=Class(TForm)
         ....
       end; //注册类
     RegisterClass(TMyForm); //查找类
     var
        ClassRef:TMyForm;
        frm:TMyForm;
     begin
       Ref := FindClass('TMyForm');
       frm := Ref.Create(nil);
       .....
     end;