Open Dialog autoconnect

[RWarnecke]

Wann tritt das Problem auf ? Wenn Du Word geschlossen hast oder offen hast ?

Edit:
Dieses Beispiel funktioniert :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var FileName:OleVariant;
  vWhat, vBookmark:OleVariant;
begin
  if OpenDialog1.Execute then
    FileName := OpenDialog1.FileName
  else
    exit;
  if assigned(WordApplication1) then
  begin
    WordApplication1.Connect;
    WordApplication1.Documents.OpenOld(FileName, EmptyParam, EmptyParam,
      EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
      EmptyParam, EmptyParam);
    WordDocument1.ConnectTo(WordApplication1.ActiveDocument);
    WordApplication1.Visible := True;
    vWhat:=wdGoToBookmark;
    vBookmark:='Name';
    WordApplication1.Selection.GoTo_(vWhat,emptyParam,emptyParam,vBookmark);
    WordApplication1.Selection.TypeText('Max Mustermann'#13'Dorfstraße 100');
  end;
end;