Generics TForm

[Rollo62]

Du kannst aber einen eigenen TForm-Interposer bauen, der dann deine eigenen Funktionen mit hereinbringt.
Wenn man es nicht übertreibt, dann bleibt die neue TForm auch ganz normal im Designer verfügbar, es muss nur deine Unit z.B. "FMX.Form.Interposer" immer hinter dem normalen FMX.Form eingebunden werden, damit das neue TForm verwendet wird.

Das geht natürlich für VCL genauso wie für FMX.

Delphi-Quellcode:

unit FMX.Form.Interposer;

interface

Uses
  FMX.Form;


type
  TForm = class( FMX.Form.TForm )

      procedure MeineTolleFunktion;

  end;