Почему не двигаются чужие окна?

[verka1]

Доброго всем времени суток.

Подскажите, плиз.

Почему не двигаются главные окна «монстров»?
Мое окно двигается, а окна браузеров, не хотят,)
Неверно определен класс окон? Или еще что-то?
(Проверялось: Delphi 7, Windows XP)

procedure TForm1.Button1Click(Sender: TObject);
var h:HWND;
begin
 // h:=FindWindow('TForm1', nil);
 // h:=FindWindow('MozillaWindowClass', nil);
 h:=FindWindow('Chrome_WidgetWin_0', nil);
 {
 Пробовала окна
 Chrome_WidgetWin_0
 Chrome_WidgetWin_1
 Chrome_OmniboxView
 }
 if h<> 0 then begin
  CheckBox1.Checked := true;
  SetWindowPos(h, HWND_BOTTOM, 0, 0, 200, 200, SWP_NOSIZE);
 end else CheckBox1.Checked := false;
end;

[newerow1989]

А если попробовать это:

SetWindowPos(h,0,0,0,200,200,SWP_NOZORDER+SWP_NOACTIVATE);

[verka1]

Спасибо, но нет, не хотят они двигаться)

[newerow1989]

Есть ли название заголовка окна "Chrome_WidgetWin_0"?

   H:=FindWindow(nil,'Chrome_WidgetWin_0');
   If H<>0 then
      SetWindowPos(h,0,0,0,200,200,SWP_NOZORDER+SWP_NOACTIVATE);

[verka1]

Окно с таким классом в Хроме есть, во вс. случае было 2 недели назад)
Я проверяла и его, час назад - у меня не заработало.
Но у меня винда XP. соответственно и Хром "не самый свежий"...

[eoln]

Двигается окно, просто их там много и нужно найти нужное.
Либо перебор по параметрам, либо указать ещё и заголовок. Но не факт, что оно будет уникальным. Что-то типа

h:=FindWindow('Chrome_WidgetWin_1', 'Новая вкладка - Google Chrome');

В общем перебор через FindWindowEx и всё найдётся. (Как вариант проверять есть ли у кандидата дочерние окна - у новой вкладки они есть, остальные бездетные, но нужно проверить эту догадку)
0.jpg

[verka1]

Спасибо.
Буду пробовать, хотя вроде к заголовку привязываться не очень правильно, он может оказаться разным.
А что за утилитка у вас на скрине?

[eoln]

не очень правильно

не очень, но кроме имени класса нужно ещё что-то проверять (координаты, св-во visible или что-то ещё в зависимости от задачи)
Отслеживать данные окон можно WinSpy-подобными программами, варианты разные есть в сети, на скрине этот динозавр https://www.catch22.net/software/winspy-17 - без излишеств, но я к нему привык