| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Подскажите, как выдрать надпись из чужой программы? [D7, WinXP]
0bsid © (2006-06-30 13:06:00)Подскажите, как выдрать надпись из чужой программы?
надо както найти идентификатор этого окна, его контролсов и уже взять как-то надпись. Как это сделать?
0bsid (2006-06-30 16:36:00) [1]Спасибо Handle, но показывает только названия окон
мозгов похоже у меня не хватает :)
что изучать?
Handle (2006-06-30 15:47:00) [2]
procedure TForm1.Timer1Timer(Sender: TObject);
var
s: string;
h: HWND;
begin
h := WindowFromPoint(Mouse.CursorPos);
SetLength(s, SendMessage(h, WM_GETTEXTLENGTH, 0, 0)+1);
SendMessage(h, WM_GETTEXT, length(s), Integer(PChar(s)));
SetLength(s, lStrLen(PChar(s)));
Caption := s;
end;
0bsid (2006-06-30 14:40:00) [3]
> zdm (30.06.06 13:14) [1]
> Есть прога, куда тебе её бросить?
sidor6@mail.ruисходники?
спасибо заранее )
0bsid (2006-06-30 14:39:00) [4]
> Надпись - это какой компонент?
> TLabel не имеет оконного хэндла, поэтому к нему не достучаться.
>
какой тип - неизвестно даже, но не TLabel, скорее TList
zdm (2006-06-30 13:18:00) [5]Sign 0f Misery (запускаешь подводишь мышкой к любому окну и она выведет тебе всю инфу)
Desdechado (2006-06-30 13:15:00) [6]Надпись - это какой компонент?
TLabel не имеет оконного хэндла, поэтому к нему не достучаться.
zdm (2006-06-30 13:14:00) [7]Есть прога, куда тебе её бросить?
| |
