Embedded Word-Application

[Sergej_Molotov]

Hallo Zusammen,

ich habe mal eine Frage, ob einer von euch ein kurzes und "schönes" Beispiel hat, wie man ein Word.Application Object mittels eines TOleContainer's in seiner normalen VCL-Anwendung einbinden kann. Hierbei ist zu beachten, dass es ebenfalls für die neueren Word-Versionen funktionieren soll, wie z.B. für Word 2007 oder 2010 (Menüleiste).

Das einzige, was mir gelungen ist, ist folgendes Beispiel:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  FContainer          := TOleContainer.Create(Panel_Word);
  FContainer.Modified := false;
  FContainer.Parent   := Panel_Word; // Normales TPanel
  FContainer.Align    := alClient;
  FContainer.CreateObject('Word.Document',  true);
  FDocument           := IDispatch(FContainer.OleObject) as _Document;
  FWord               := FDocument.Application;
  FContainer.DoVerb(ovShow);
end;

Nur mittels 'Word.Document' konnte ich Word in meinem Form einbinden, ABER durch die Menüleiste von Word, werden andere VCL-Panels überlagert. Alles nicht so wie es sein sollte.

Vielleicht hat ja einer von euch auch schon mal damit zu tun gehabt.

Grüße