Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.08.2013, 22:41   #1
Amilman
Пользователь
 
Регистрация: 19.12.2012
Сообщений: 49
Злость Не видит когда соврачивается чужая программа

Всем доброго времени суток. Проблема в том что когда я проверяю свернута ли чужая программа или нет то на примере Калькулятора все работает а на примере нужной мне программы нет. Использую код:
Код:
var
  fw: HWND;
  a: Boolean;
begin
  fw:= FindWindow(nil, 'Управление картой');
  if IsIconic(fw)=true then button1.Caption:='Open' else
  button1.Caption:='hide';
Хотя с автоподстройкой разрешения моей программы и определением чужого окна все нормально.

Код:
var
  hw: HWND;
  FormRgn: HRGN;
  r: TRect;
begin
  if GetWindowRect(FindWindow(nil, 'Управление картой'), r) then
    MainForm.Width := Screen.Width - r.Width
  else
    MainForm.Width := Screen.Width;
end;
Amilman вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Программа не видит ini-файл AlexPv Помощь студентам 4 01.06.2012 12:01
Незакрывающаюся чужая программа sedoq Общие вопросы Delphi 0 18.02.2012 17:49
Чужая собака и моя семья:) Rekky Свободное общение 18 24.06.2011 20:25
С++: программа не видит терминатор инструкции((( Blondy Помощь студентам 3 25.02.2011 17:38
Узнать когда закроется программа NoName_emaNoN Общие вопросы Delphi 7 18.07.2010 12:33