Ступор в repeat ... until

[Vol666]

Вообщем я имею н-ое кол-во окон с одинаковым классом, мне их нужно спрятать, первая часть условия мне понятна repeat, а вот что делать с until? подскажите, до какого условия повторять цикл.
P.S. только что пришло посчитать кол-во окон и выполнять цикл пока они не закончатся, но собственно как их посчитать ведь их может быть 100!

[mihali4]

Покажите, что вы хотите делать в цикле.
Как вы ищете окна?
Где код-то?

[Vol666]

repeat
h:=FindWindow('xxx',nil);
ShowWindow(h,SW_HIDE);
until
// и не знаю до каких пор повторять цикл... чтобы например 20 окон одинакового класса исчезли...

[Вавел из ГМТУ]

FindWindow('xxx',nil); - вот это наверное должно чтото вернуть 0 (или что там в хелпе) при "не найдено ни одного окна" или чтото такое....

[Пепел Феникса]

20 окон?
одно и тоже?
надо EnumWindows(или FindWindowEx) в данном случае...а то 20 раз одно окно найдешь..

[mihali4]

Слава богу! Партизан раскололся!
Until h<=0...
И обратите внимание на совет Пепел Феникса.

[Вавел из ГМТУ]

А вам не кажется что логичнее применить цикл While?

Ведь сначала поищем, а потом, если нашли, делае ShowWindow(h,SW_HIDE);....
Зачем делать ShowWindow(h,SW_HIDE); если мы ничего не нашли....

[Vol666]

у окон только классы одинаковые, а вот названия варьируются до бесконечности...
Значит пока меньше либо равно нулю, но что это даст поясните...

[Пепел Феникса]

Значит пока меньше либо равно нулю, но что это даст поясните...

пока находим какое либо окно то делаем.

[raxp]

или так...

 wnd:= GetWindow(Handle, gw_HWndFirst);
 while wnd <> 0 do begin
  //бла-бла проверка
  wnd:= GetWindow(wnd, gw_hWndNext)
 end