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