Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.09.26;
Скачать: CL | DM;

Вниз

Извенить текст StatusBar a в чужом приложении.   Найти похожие ветки 

 
Сергей В. М.   (2004-08-13 15:51) [0]

Ув. Мастера. Снова я в тупике. Необходимо изменить текст в statusBare (такая маленькая полоска внизу окна, в ней доп. инфо выводится) и при всём при этом эта полоска находится в чужом приложении. Т.е. я где-то слышал, что в runTime в чужом приложении можно поменять заголовок или label, а про StatusBar- не нашел :(


 
Crazy_8-)   (2004-08-15 04:52) [1]

Юзать надо
function FindWindow(lpClassName, lpWindowName: PChar): HWND
и
FindWindowEx(Parent, Child: HWND; ClassName, WindowName: PChar): HWND

1-lpClassName=nil
 lpWindowName="Заголовок окна жертвы"
сохраняешь результат в переменной типа HWND:
var
 h,h2 : hwnd;
begin
...
h:=FindWindow(nil,"notepad");
h2 := FindWindowEx(h, h2,TStatusBar{имя класса окна}, "текущая надпись")


дальше посылаешь разл сообщения h2 с помощью SendMessage

P.S.: Читай Help



Страницы: 1 вся ветка

Текущий архив: 2004.09.26;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.023 c
14-1094237837
Soft
2004-09-03 22:57
2004.09.26
Microsoft запантетовала человеческое тело.


14-1094235388
gn
2004-09-03 22:16
2004.09.26
меня сегодня пытались ограбить чуть сосмеху не помер


14-1094333513
kull
2004-09-05 01:31
2004.09.26
Как писать ТЗ?


3-1093952484
Morrison
2004-08-31 15:41
2004.09.26
Инсталляция BDE


14-1094383441
Voland
2004-09-05 15:24
2004.09.26
Как можно улучшить этот код