Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Помогите с findwindow в Delphi (https://forum.antichat.xyz/showthread.php?t=33866)

fen 21.02.2007 14:21

Помогите с findwindow в Delphi
 
Захотел написать программку, каторая бы скрывала все окна, заголовки каторых начинаются на ==
Приведу пример, того что сейчас есть:
Код HTML:

procedure TForm1.Button1Click(Sender: TObject);
 var
 h: HWND;
 begin
 h := findwindow(nil,'== любой текст');
 if h <> 0 then
  SetWindowPos(h, SW_HIDE, 1, 1, 20, 20, SWP_HIDEWINDOW);
 end;

По примеру видно, что по нажатию кнопки, все окна, заголовки каторых == любой текст скроются, но нужно чтобы только по первым двум символам == заголовка скрывалось окно. Как это реализовать, подскажите кто знает...

_Great_ 21.02.2007 14:36

юзай EnumWindows / lstrncmpi

зы. ЙА МАЛЕНЬКИЙ ПАКИМОН а-а-а-а--а-а-аа--аа-

W!z@rD 23.02.2007 21:33

Код HTML:

  SetWindowPos(h, SW_HIDE, 1, 1, 20, 20,
1. а ShowWindows(WindowHandle, SW_HIDE) не подходит?
2. Тебе надо перечислить все окна. затем функцией pos, парсить заголовки, лосить все с '==' и скрывать выше указанным кодом


Время: 20:32