Könnte jemand erklären, wie man die
INTACustomDockableForm Schnittstelle benutzen soll?
Ich habe so probiert:
Alle UI Komponente habe ich in TMyFrame kopiert, und die originale Form enthält jetzt nur diesen Frame:
Delphi-Quellcode:
TMyForm = class(TDockableForm)
var
MyFrame1 : TMyFrame;
...
end;
...
{$R *.dfm}
Meine Form ist von dieser Klasse abgeleitet:
Delphi-Quellcode:
TDockableForm = class(TForm, INTACustomDockableForm)
...
/// <summary>
/// Returns the class of the frame that you want embedded in the dockable form
/// </summary>
function GetFrameClass : TCustomFrameClass; virtual; abstract;
/// <summary>
/// Called when an instance of the specified frame class is created
/// </summary>
procedure FrameCreated(AFrame : TCustomFrame); virtual;
...
end;
GetFrameClass gibt die Klasse TMyFrame zurück.
Wenn ich die Erweiterung aus Menü aufrufe, wird (nach ein Paar
Exception) die Form korrekt angezeigt, aber
FrameCreated wird nicht aufgerufen, und mein
OutputDebugString Meldungen aus TMyFrame werden auch nicht angezeigt...
Wie sollte das gemacht werden? Hat jemand vielleicht ein Beispiel?