| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с текстом в чужих окнах
Ajax © (2003-07-30 09:42:00)
Пишу плагин к своей проге, который будет исправлять неправильно введенный текст (вУДЗРШ-Delphi). Написал функцию, которая получает выделенный текст из активного окна.
Function GetTextSelected(Wnd:hwnd):string;
var P: PChar;
StartPos, EndPos, x, NumOfEnter: Integer;
begin
NumOfEnter:=0;
Result:="";
SendMessage(Wnd, EM_GETSEL, Longint(@StartPos), Longint(@EndPos));
if EndPos-StartPos<=0 then exit;
P:= StrAlloc(SendMessage(Wnd, WM_GETTEXTLENGTH, 0, 0) + 1);
SendMessage(wnd, WM_GETTEXT,StrBufSize(P), Longint(p));
if length(p)<=0 then exit;
for x:=1 to StartPos do
if (p[x]=chr(13)) or (p[x]=chr(10)) then inc(NumOfEnter);
Result:=copy(p,StartPos+NumOfEnter,EndPos-StartPos+NumOfEnter);
StrDispose(P);
end;
Проблема в том, что это работает только для Edit"ов, а допустим в том же Word"е - нет. Вот и думаю, как с этим справится? Можно еще использовать wm_copy-wm_paste, но тогда нужно сохранять и восстанавливать буфер обмена, а этим заниматься как-то лень.
Что посоветуете?
Ajax (2003-07-31 09:05:00) [1]
Сейчас разбираюсь с вариантом использования буфера обмена... Кажется на "красивость" решения можно даже не надеятся :-(
XAMLO (2003-07-31 01:30:00) [2]
Он тебя не понимает. Я понял но как это сделать не знаю.
самому бы было интересно
Ajax (2003-07-30 11:38:00) [3]
>chs2r © (30.07.03 10:10)
>перехватывай нажатия клавиш, сохраняй в буфер, потом по пробелу там или по Enter сверяй
Либо я тебя не понимаю, либо ты меня...
chs2r (2003-07-30 10:10:00) [4]
перехватывай нажатия клавиш, сохраняй в буфер, потом по пробелу там или по Enter сверяй
| |
