Форум: "WinAPI";
Текущий архив: 2005.01.02;
Скачать: [xml.tar.bz2];
Вниз
Как найти все окна с заданным заголовком и классом? Найти похожие ветки
← →
Progh (2004-11-19 08:43) [0]Как найти все окна с заданным заголовком и классом, при том что открыто их может быть несколько одинаковых
← →
Jay (2004-11-19 09:10) [1]Repeat
handle := FindWindow("TForm1", "My Window"); //или на оборот
if handle = 0 then Break; //Выход из цикла при отсутствии такого окна
PostMessage(handle, WM_QUIT, 0, 0); //тушить их, например
Until false //Безконечный цикл
← →
easy © (2004-11-19 09:47) [2]
function EnumWindowsProc(Wnd: hWnd; Param: lParam): Bool; stdcall;
var
buf:array [0..MAX_PATH] of char;
begin
GetClassName(Wnd,buf,MAX_PATH);
if buf="IEFrame" then begin
GetWindowText(Wnd,buf,MAX_PATH);
TMemo(Param).Lines.Add(buf);
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Clear;
EnumWindows(@EnumWindowsProc, Longint(Memo1));
end;
← →
DelphiN! © (2004-11-19 13:55) [3]
> [1] Jay (19.11.04 09:10)
А что будет с твоим кодом, если окно не захочет закрываться? Наивный ты ;)
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2005.01.02;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.043 c
