Enregistrer le document Word ouvert dans delphi olecontainer - delphi, ms-word, ole

J'ai un document Word ouvert dans un conteneur OLE. Je voudrais sélectionner tout le texte (Ctrl-A) puis copier dans le presse-papiers sans utiliser les frappes.

La deuxième fonctionnalité souhaitée est la possibilité d’enregistrer les modifications apportées au document.

Réponses:

Peut-être que ce code vous aidera:

uses ComObj, Clipbrd;
...
var
Word : OLEVariant;
begin
Word := CreateOleObject("Word.Application");

// If you do not want to see word, set it to false.
Word.Visible := False;

//Open the word document.
Word.Documents.Open("C:myDocument.doc");

//Select all.
Word.ActiveDocument.Select;

//Copy to Clipboard.
Word.ActiveDocument.Range.Copy;

//Close the document.
Word.ActiveDocument.Close;

//Quit word.
Word.Quit;

//Free.
Word := unassigned;

//Now you can paste the text from clipboard.
Memo1.PasteFromClipboard;
end;