Прочитать из Word при помощи OLE

← →
Виталя © (2003-11-12 16:25) [0]

Подскажите пожалуйста процедуру для чтения выделенного слова из Word
У меня следующий код:
var MSWord:Variant;
str:string;
begin
try
MsWord := CreateOleObject("Word.Application");
MsWord.Visible := True;
except
Exit;
end;
MsWord.ChangeFileOpenDirectory("D:\...\...\");
MsWord.Documents.Open("My.doc",True,False,False,"","",False,"","",wdOpenFormatAuto);
MsWord.Selection.MoveDown(wdLine,3);
MsWord.Selection.MoveRight(wdCell,wdExtend);
Теперь по идее нужное слово выделено, как загнать его в str ?

← →
me (2003-11-12 20:38) [1]

Самое простое - скопировать выделенное в клипборду, а затем извлечь оттуда.

MsWord.Selection.Range.Text ???

Прочитать из Word при помощи OLE Найти похожие ветки