Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.09.17;
Скачать: [xml.tar.bz2];

Вниз

как узнать имя активного окна   Найти похожие ветки 

 
zxcv   (2006-08-30 20:35) [0]

народ подскажите как узнать имя активного окна?
и нажимать на нем кнопки


 
Ketmar ©   (2006-08-30 20:37) [1]

внимательно смотреть на монитор?


 
medved_68 ©   (2006-08-30 21:45) [2]


> народ подскажите как узнать имя активного окна?
> и нажимать на нем кнопки
> <Цитата>


> внимательно смотреть на монитор?

и задать вопрос Винде: Че там у тебя активно, **ка. Быстро выложь на экран!!!! Блиннн класно рифмуется сейчас пойду вирши накропаю, zxcv   в любом случае спасибо за идею!!!!Счас такое на***вертим Маяковский отдыхает!!!! Замучаетесь слушать!!!! :))


 
DevilDevil ©   (2006-08-30 21:59) [3]

function GetActiveWindowText : string;
var
 WND : HWND;
 Text : string;
 L : integer;
begin
 WND := GetActiveWindow;

 L := GetWindowTextLength(WND);
 SetLength(Text, L);
 GetWindowTex(WND, pchar(Text), L);

 Result := Text;
end;


Для "нажатия" кнопок сначала надо найти такую кнопку используя EnumChildWindows, потом послать соответствующее сообщение


 
DprYg ©   (2006-08-30 22:47) [4]

Чтобы узнать дескриптор активного окна данного потока - GetActiveWindow.
Если окна, с которым работает пользователь любого потока - GetForegroundWindow


 
Ketmar ©   (2006-08-31 00:10) [5]

> [4] DprYg ©   (30.08.06 22:47)
не вижу в вопросе упоминания о каких-то "дескрипторах". вопрос вполне конкретный. кроме как смотреть на монитор и использовать клаву/мышь -- решений не вижу. "экзотику" не считаем.


 
R0NYN   (2006-08-31 00:15) [6]

Помоему GetForegroundWindow


 
DiamondShark ©   (2006-08-31 00:16) [7]

Ну прямо по Шекли... Главное -- вопрос правильно задать
;)


 
DevilDevil ©   (2006-08-31 00:17) [8]

> Ketmar ©   (31.08.06 00:10) [5]

Вторая половина поста вообще неадекватна; первая... он "подправил" мой пост


 
Ketmar ©   (2006-08-31 00:28) [9]

> [7] DiamondShark ©   (31.08.06 00:16)
ну да. правильный вопрос -- половина ответа. %-)


 
DevilDevil ©   (2006-08-31 00:31) [10]

> Ketmar ©   (31.08.06 00:28) [9]

"Спустись с небес на землю... поймёшь простых смертных" (с)


 
DprYg ©   (2006-08-31 09:59) [11]


> DevilDevil ©   (31.08.06 00:17) [8]
:)) Пишу из пад стола.
А если серьезно, то кое-кому не мешало бы хэлп читать(чем отличаются GetActiveWindow и GetForegroundWindow) и код проверять на работоспособность, а то [3] затирает один символ в конце, ставя вместо него нулевой...


 
Ketmar ©   (2006-08-31 10:10) [12]

> [11] DprYg ©   (31.08.06 09:59)
оне не умеют. у них есть пророк и его религиозная литература.


 
DevilDevil ©   (2006-08-31 10:35) [13]

> Ketmar ©   (31.08.06 10:10) [12]

Кто то святой на очепятки, как я погляжу?


 
DevilDevil ©   (2006-08-31 10:39) [14]

ЭЙ, ЗАНУДЫ !!!

МОЖЕТ БЫТЬ КТО НИБУДЬ НАПИСАЛ как именно найти и "нажать" на соответствующую кнопку, а ?! Ketmar, ты - флудер! Не припомню от тебя ни одного информативного поста! Давай, пора бы начать!



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

Форум: "Начинающим";
Текущий архив: 2006.09.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.041 c
15-1156367626
Dbn
2006-08-24 01:13
2006.09.17
The Bat! - "Невозможно окрыть файл ikey.id"


15-1156741216
begin...end
2006-08-28 09:00
2006.09.17
28 августа. С Днём рождения!


2-1156754056
XTD
2006-08-28 12:34
2006.09.17
Почему в процедуре FormCreate; не работает Form1.Visible:=False;?


15-1156605051
yura32
2006-08-26 19:10
2006.09.17
DLL


2-1156416761
Alexey 12
2006-08-24 14:52
2006.09.17
Чтение последних строк файла





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский