SendMessage

← →
Shrek © (2002-09-09 19:55) [0]

Привет Дюди! У меня такая проблема, исполюзую:
SendMessage(GetFocus, WM_PASTE, 0, 0);
для вставки текста из буфера, и для Word-да не работает. Может кто сталкивался с такой проблемой. Помогите кто может!

← →
TTCustomDelphiMaster © (2002-09-09 20:20) [1]

Word это вам не notepad, с ним такой номер не пройдет.

← →
Shrek © (2002-09-09 20:26) [2]

Да об этом я знаю.
Но всётаки существует ли способ?

This example copies and pastes the first table in the active document into a new document.

If ActiveDocument.Tables.Count >= 1 Then
ActiveDocument.Tables(1).Range.Copy
Documents.Add.Content.Paste
End If

This example copies the first paragraph in the document and pastes it at the insertion point.

ActiveDocument.Paragraphs(1).Range.Copy
Selection.Collapse Direction:=wdCollapseStart
Selection.Paste

SendMessage Найти похожие ветки