Архив форумов ЦИТФорума

[Y]

Как узнать в программе, свернуто или развернуто окно этой самой программы (ну типа в долгом цикле)? - на Delphi.

[violator]

if Form1.WindowState=wsMinimized then
begin
.....
end;

[Y]

Да вот в том-то и дело, что таким способом никак не получается - все время оно в wsNormal - и когда в свернутом виде - тоже...

[violator]

1)когда окно развернуто на полный экран
свойсво WindowState принимает значение
wsMaximized;
2)когда окно свернуто - wsMinimized;
3)в других случаях-wsNormal, и размеры
окна определяются свойствами Width,Height,
а координаты - Left,Top;
Для 1 и 2 случаяев координаты и размеры окна
не играют значения.
Соответсвенно все эти параметры динамически изменяются во время операций с окном.
Другое дело когда ты это значение
WindowState читаешь.

[Y]

... Запускаю прогу (во время отладки) - начинается там цикл - сворачиваю окно - в цикле устанавливаю брекпоинт - прога останавливается - смотрю и все-равно wsNormal... - Мож я чего-то не понимаю?

[violator]

смотри help по темам
TApplication.OnMinimize
TApplication.Minimize

[zzz]

MainForm и любая другая форма вообще не меняет состояние. Это относится только к Application.

IsIconic(Application.Handle)

[violator]

???