VPF::Заголовог активного окна - Форум программистов

badman

Дата 9.4.2006, 05:48 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 2.4.2003
Где: Североморск, Мурм анская обл.

Репутация: нет
Всего: нет

Привет всем!
Может кто знает как в Делфи получить заголовок активного окна, или же окна которое находится под активным окном?

MIX55

Дата 9.4.2006, 13:30 (ссылка)

(нет голосов)

Загрузка ...

много работы

Профиль
Группа: Awaiting Authorisation
Сообщений: 208
Регистрация: 23.10.2005
Где: Здесь

Репутация: нет
Всего: 4

Если я правильно понял то:

GetForegroundWindow - возвращает дескриптор активного окна.

а вот так можно получить текст заголовка определенного окна: см. тут в том числе и активного

Это сообщение отредактировал(а) MIX55 - 9.4.2006, 13:34

--------------------

Hарод, а как в дельфи писать паскалевские проги....?*********************************************Жизнь слишком коротка, чтобы писать на Assembler'e

Sunvas

Дата 10.4.2006, 00:34 (ссылка)

(нет голосов)

Загрузка ...

Соль и сахар

Профиль
Группа: Участник
Сообщений: 3388
Регистрация: 12.3.2006
Где: Тосно

Репутация: нет
Всего: 89

Ставишь таймер с интервалом 100 и вот че там пишешь

Код


procedure TForm1.Timer1Timer(Sender: TObject);
Var
WND:HWND;
WinClass,WinCap:String;
begin
WND:=GetForegroundWindow;
SetLength(WinCap,SendMessage(WND,WM_GETTEXTLENGTH,0,0)+1);
GetWindowText(WND,@WinCap[1],Length(WinCap)+1);
SetLength(WinClass,255);
GetClassName(WND,@WinClass[1],Length(WinClass));
///////////Далее свое: WinClass - класс окна, WinCap - заголовок окна.
end;

--------------------

Воспитывая детей по своему образу и подобию, родители почему-то надеются, что они будут лучше их.

badman

Дата 10.4.2006, 06:32 (ссылка)

(нет голосов)

Загрузка ...

Вот спасибо, огромное.

Snowy

Дата 10.4.2006, 08:54 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 30
Всего: 484

http://forum.vingrad.ru/index.php?showtopi...oregroundwindow

badman

Дата 16.4.2006, 07:03 (ссылка)

(нет голосов)

Загрузка ...

Понял, что заголовок активного окна мне не очень помогает, так как моё приложение находится поверх всех окон, вопрос как узнать заголовок неактивного окна находящегося под моим окном (приложением)?

Тьма

Дата 16.4.2006, 09:16 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 339
Регистрация: 22.1.2005
Где: Украина, Винница

Репутация: нет
Всего: 4

var s : PChar;
...
H := GetWindow(Handle, GW_HWNDPREV);
GetWindowText(h, @s, 256);//хендл, адрес буфера, длина буфера

--------------------

Vir magni ingenii

badman

Дата 19.4.2006, 06:11 (ссылка)

(нет голосов)

Загрузка ...

Цитата(Тьма @ 16.4.2006, 01:16

)

var s : PChar;
...
H := GetWindow(Handle, GW_HWNDPREV);
GetWindowText(h, @s, 256);//хендл, адрес буфера, длина буфера

Что то не получается smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: WinAPI и системное программирование \| Следующая тема »