Thema: Delphi {M+} Vererbung

Einzelnen Beitrag anzeigen

Benutzerbild von Neutral General
Neutral General

Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#3

Re: {$M+} Vererbung

  Alt 19. Nov 2007, 15:54
Hi,

Das ganze sieht so aus.

Delphi-Quellcode:
unit NVCLForms;

{$M+}
  TNVCLForm = class(TNVCLControl)
    //...
  end;
{$M-}

Delphi-Quellcode:
unit Unit1;

uses NVCLForms;

type

  TForm1 = class(TNVCLForm)
    procedure Wasweißich(Sender: TBlubb);
  private
      //...
  public
  end;
procedure Wasweißich(Sender: TBlubb);

wird nicht per RTTI gespeichert. Erst wenn ich {$M+} hinzufüge klappts.

Gruß
Neutral General
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
  Mit Zitat antworten Zitat