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

Вниз

не находится хэндл у самой программы   Найти похожие ветки 

 
cvg   (2006-12-28 17:08) [0]

Программа делает активным окно другой программы, а потом должна обратно перевести фокус на себя. У той другой программы имя класса = "InfoClass", хэндл находится без проблем. У самой программы (согласно утилите Spy++) имя класса = "TMainForm". Но функция FindWindow почему-то упорно возвращает ноль :(. В чем может быть дело?

Примеры успешного и неуспешного обращения к функции FindWindow:

    wHandle := FindWindow("InfoClass");
    h_prg := FindWindow("TMainForm");


 
Рамиль ©   (2006-12-28 18:08) [1]

А Self.Handle уже не катит?


 
cvg   (2006-12-29 08:13) [2]

Хмм... Всё это хорошо, но почему-то строка windows.BringWindowToTop(self.Handle); окно текущей программы в фокус не помещает. Почему бы это?


 
Elen ©   (2006-12-29 08:19) [3]


>  а потом должна обратно перевести фокус на себя.

BringWindowToTop(Form1.Handle) Где Form1 - главная форма


 
cvg   (2006-12-29 08:31) [4]

windows.BringWindowToTop(MainForm.Handle); тоже никакого видимого влияния на ход выполнения программы не оказывает :(


 
Elen ©   (2006-12-29 08:51) [5]


> cvg

Вот тебе выкрутас один: приводит форму наверх

Form1.FormStyle:=fsStayOnTop;
Form1.FormStyle:=fsNormal;


Не суди за код строго, мне иногда помогает.


 
cvg   (2006-12-29 08:58) [6]

Спасибо, Elen, сработало! :)


 
Elen ©   (2006-12-29 09:03) [7]


> cvg

Пожалуйста. Креативные Извраты всегда работают ;)



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

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

Наверх




Память: 0.48 MB
Время: 0.03 c
2-1167829548
dstrogiy
2007-01-03 16:05
2007.01.21
Background-музыка


15-1167566081
Riply
2006-12-31 14:54
2007.01.21
С Новым Годом Всех !


2-1167323023
Kostafey
2006-12-28 19:23
2007.01.21
Null в SQL и Delphi


2-1167738248
owow1
2007-01-02 14:44
2007.01.21
TEdit + "Вставить"


3-1162447536
firebird
2006-11-02 09:05
2007.01.21
Как создать конструктор отчетов?