Word und Ole

[sputum]

Hallo

ich habe ein Problem mit Ole und Word. Ich lade ein Dokument z.B. yetobb.doc, hier springe ich an gewisse Textmarken und schreibe etwas hinein. Dann Speichere ich das Dokument unter anderem Namen ab, was auch soweit funktioniert.
Das Problem ist, dass Word dann das ursprüngliche Dokument z.B yetobb.doc "Schreibschützt" und eine Instanz von Word im Taskmanager zu sehen ist! Erst nachdem ich diese Instanz beendet habe und die Datei yetobb.doc manuell in Word geöffnet habe kann ich den Vorgang wiederholen! Sollte man allerdings beliebig oft durchführen können!

Delphi-Quellcode:

  try
    WordInst:=CreateOleObject('Word.Application');
  except
    showmessage('Fehler beim laden on Word!');
    Exit;
  end;
  WordInst.Visible:=false; 
  RechDoc:=WordApp.Documents.Open('c:\yetobb.doc');
  
  RechTable:=RechDoc.Tables.Add(WordInst.Selection.Range, ir, ic);
  //hier wird dann die Tabelle gefüllt,geht auch alles

  //hier drucke ich im Hintergrund 
  if (autoprint = 'true') then
    begin
      Background:=false;
      Append:=false;
      Range:=wdPrintAllPages;
      RechDoc.PrintOut(Background, Append, Range);
    end;

  WordInst.ActiveDocument.SaveAs('c:\' + IntToStr(rech_num) + '.doc');
  WordInst:=Unassigned;
  RechDoc:=Unassigned;
  RechTable:=Unassigned;

Kann mir vielleicht jemand helfen, ich komme einfach nicht drauf wo der Fehler steckt, bzw. wie man ihn am lößt!

Vielen Dank im Voraus

Gruß Sputum

[Christian S.]

Ich denke, Du musst Word noch mit "WordInst.Quit" beenden.

Grüße
Christian