Вниз
Скачать: CL | DM;

Как получить дискриптор окна моей программы?   Найти похожие ветки 

← →
turonix ©   (2004-02-02 11:26) [0]

Была какая-то функция но я забыл ее название поэтому никак найти не могу


← →
Alexander666 ©   (2004-02-02 11:28) [1]

Application.Handle?
FormName.Handle?


← →
turonix ©   (2004-02-02 11:34) [2]

Все я разобрался: GetActiveWindow


← →
Rouse_ ©   (2004-02-02 11:58) [3]

GetActiveWindow - вернет тебе хэндл активного окна и не обязательно что это окно будет твоим...


← →
Thick   (2004-02-02 12:25) [4]

Если пишеш на АРІ, то CreateWindow возвращает этот самый дескриптор


← →
Игорь Шевченко ©   (2004-02-02 13:53) [5]

Rouse_ ©   (02.02.04 11:58)


> вернет тебе хэндл активного окна и не обязательно что это
> окно будет твоим...


А чьим еще оно сможет быть ?


← →
Rouse_ ©   (2004-02-02 14:08) [6]

> [5] Игорь Шевченко ©   (02.02.04 13:53)

procedure TForm1.Timer1Timer(Sender: TObject);
var
 H: HWND;
 Buf: array [0..255] of Char;
begin
 H := GetActiveWindow;
 GetWindowText(H, @Buf[0], 256);
 Memo1.Lines.Add(IntToStr(H) + " " + String(Buf));
end;


Если запустить данный код и посворачивать форму, просто делать ее не активной, то можно увидеть что иногда он возвращает ноль, иногда Form1 а иногда Project1

Ps: Просто неверно выразился ;)


← →
Anatoly Podgoretsky ©   (2004-02-02 14:17) [7]

Это три активных окна, но твоих


← →
Rouse_ ©   (2004-02-02 14:26) [8]

> [7] Anatoly Podgoretsky ©   (02.02.04 14:17)
Нет, в одном варианте возвращается Application.Handle - это Project1
Во втором Form1.Handle
А в третьем вообще ничего не возвращается...

И судя по вопросу "Как получить дискриптор окна моей программы?" неизвесно какое именно окно хочет получить автор вопроса, вот я и сказал что не обязательно будет твое (ну т.е. не то которое тебе нужно...)



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
1-1080105759
Folder
2004-03-24 08:22
2004.04.11
Как программно удалить папку?


1-1082527909
denisWW
2004-04-21 10:11
2004.04.11
Вопрос по F1Book


8-1071491482
Rimd
2003-12-15 15:31
2004.04.11
Длинна текста


14-1079596768
Leon Crom
2004-03-18 10:59
2004.04.11
Пасхальные яйца


3-1078830044
Stas
2004-03-09 14:00
2004.04.11
Delphi8 и ADO




   Наверх