Einzelnen Beitrag anzeigen

Headbucket

Registriert seit: 12. Dez 2013
Ort: Dresden
144 Beiträge
 
Delphi 10.1 Berlin Professional
 
#7

AW: RegisterClass/GetClass von TFrame schlägt nach Projektumstieg XE8 -> Delphi 10.1

  Alt 11. Jan 2017, 12:12
Ein guter Tipp. Manchmal kommt man auf die einfachsten Dinge nicht... .
Delphi-Quellcode:
initialization
  RegisterClass(TMyFrame);
  FindClass('TMyFrame'); //Fehler
Auch hier erhalte ich einen Fehler. Ich habe aber nun Herausgefunden, dass es nicht alle Frames betrifft.

Die Struktur sieht bei mir wiefolgt aus:
Code:
- TTemplateFrame = class(TFrame)        //Diese Klasse kann ich registrieren und finden!
- TMyBaseFrame = class(TTemplateFrame)  //Diese Klasse kann ich registrieren und finden!
- TMySpecialFrame = class(TMyBaseFrame) //Kann nicht gefunden werden
Das kuriose, was ich auch schon geschrieben hatte: Wenn ich ein neues Frame erzeuge bekomme ich auch einen Fehler!
Delphi-Quellcode:
unit MyTestFrame_;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes,
  Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs;

type
  TMyTestFrame = class(TFrame)
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

implementation

{$R *.dfm}

initialization
  RegisterClass(TMyTestFrame);
  FindClass('TMyTestFrame'); //Fehler

end.
Es muss also am Projekt liegen. Bis auf die dpr habe ich nun alle Dateien noch einmal gelöscht - kein Unterschied.

Es ist zum verrückt werden. Am Ende muss ich mir eine alternative Methode anschauen... .

Grüße
Headbucket
  Mit Zitat antworten Zitat