| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

выделенный текст в чужом окне

esVer ©   (2004-04-15 14:04:00) 

Не подскажет ли уважаемое сообщество, как получить выделенный текст в чужом окне?
Найти активное окно и в нем активное дочернее окно - получается. А вот получить выделенный текст в нём - проблема :((

---

VMcL   (2004-04-15 16:28:00) [1]

>>esVer ©  (15.04.04 15:14) [6]

Они глобальный хук WH_KEYBOARD ставят.

---

esVer   (2004-04-15 16:25:00) [2]

> А эти перекодировщики, скорее всего работают по методу Copy&Paste.


возможно, но буфер обмена не портится, хотя, может они его восстанавливают.


> Вар 2 как бы только для RichEdit :)


м.б., но при проверке на редакторе Bred, класс окна RichEdit, а срабатывает вариант EM_GETSEL + WM_GETTEXT и никаких EM_EXGETSEL не надо...

---

BlackTr   (2004-04-15 16:18:00) [3]

А эти перекодировщики, скорее всего работают по методу Copy&Paste.
Вар 2 как бы только для RichEdit :)
MSDN:The EM_EXGETSEL message retrieves the starting and ending character positions of the selection in a rich edit control.

---

esVer   (2004-04-15 15:14:00) [4]

Ребята, я всё понимаю, но есть программы (всякие разные там перекодировщики), которые этот текст таки получают, из тех самых окон, из которых я получить не могу :(
Значит как-то можно?

И еще про вариант 2: код вроде бы брал из richedit.pas, а работать не хочет. Где я не прав?

---

Игорь Шевченко   (2004-04-15 15:10:00) [5]

esVer ©   (15.04.04 14:49)

Так никто не говорит, что из любого окна можно получить выделенный текст...

---

BlackTr   (2004-04-15 15:06:00) [6]

А с нестандартных вообще по идее нельзя получить.
Вариант 4) Делать снимок экрана и разбирать графику :))

---

esVer   (2004-04-15 14:49:00) [7]

Это всё опробовано.
Вариант 1)
 
var
 h : hWnd;
 st : string;
...
 SetLength(st, SendMessage(h, WM_GETTEXTLENGTH, 0, 0)+1);
 SendMessage(h, WM_GETTEXT, length(st), Integer(PChar(st)));
 SetLength(st, lStrLen(PChar(st)));

Получаем текст из простых TEdit и TMemo, но пролетаем со всякими нестандартными контролами :(

Вариант 2)
 
var
 h : hWnd;
 st : string;
 CharRange: TCharRange;
 i : integer;
...
 SendMessage(h, EM_EXGETSEL, 0, Longint(@CharRange));
 SetLength(st, CharRange.cpMax - CharRange.cpMin + 1);
 i:=SendMessage(h, EM_GETSELTEXT, 0, Longint(PChar(st)));
 SetLength(st, i);

Тут вообще засада... Ничего не получаю, а иногда вылазит "Out of memory" :(

Вариант 3)
 Использовать WM_COPY, в этом случае можно получить текст из некоторых нестандартных контролов, но не всех :(, да и к тому же буфер затирается...

---

Игорь Шевченко   (2004-04-15 14:26:00) [8]

EM_GETSELTEXT ?

---

BlackTr   (2004-04-15 14:16:00) [9]

WM_GETTEXT

---

Наверх