Thema: Delphi Classe aus bpl.

Einzelnen Beitrag anzeigen

hanspeter

Registriert seit: 26. Jul 2003
Ort: Leipzig
1.350 Beiträge
 
Delphi XE2 Professional
 
#1

Classe aus bpl.

  Alt 16. Feb 2006, 14:34
Hallo,

in einer bpl registriere ich eine Klasse.

Delphi-Quellcode:
initialization
  RegisterClass(TForm6);
finalization
  UnregisterClass(TForm6);
Im Hauptprogramm wende ich die Klasse dann in gewohnter Weise an.

Delphi-Quellcode:
FormClass := TFormClass(Classes.GetClass('TForm6'));
     if assigned(FormClass) then begin
         Application.CreateForm(FormClass, Form);
         Form.Position := poDesigned;
         Form.BorderStyle := bsNone;
         Form.WindowState := wsMaximized;
         Form.Show;
      end;
Beim Aufruf in der Form

Delphi-Quellcode:
Handle := loadPackage('Package2.bpl');
  if Handle <> 0 then
  begin
    FormClass := TFormClass(Classes.GetClass('TForm6'));

ist FormClass nil.

Handle ist > 0.
Was mache ich hier falsch ?

Binde ich die unit im Interfaceteil ein, dann funktioniert es.
Dann ist aber die Unit wohl auch im Projekt eingebunden?
Für einen Tip dankbar.

Gruß Peter
  Mit Zitat antworten Zitat