Показать сообщение отдельно
  #1  
Старый 23.05.2009, 12:04
Аватар для KOOL
KOOL KOOL вне форума
Активный
 
Регистрация: 06.01.2008
Адрес: Рязань
Сообщения: 306
Версия Delphi: 2009
Репутация: 6150
По умолчанию Глюк в Delphi 2009

После перевода проекта на Delphi 2009 появилась проблема, уже неделю бьюсь. Есть код:
Код:
ShellAPI.ShellExecute(0, 'open', PChar(Path+'WoW.exe'), '', PChar(Path), 1);

  if AutoLogin  and (TWowSrv(SrvList.Items[RadioGroup1.ItemIndex]).Profile<>'') and (TWowSrv(SrvList.Items[RadioGroup1.ItemIndex]).CPass<>'') then
    begin
      Sleep(delay*1000);
      FillForms(RadioGroup1.ItemIndex);
    end;
  Close;
Как видно, программа запускает WoW, ЗАТЕМ ждет, пока он загрузится, и заполняет форму входа. Из-под дельфи все работает нормально, но если запустить отдельно, то программа СНАЧАЛА ждет, а потом запускает WoW. Причем если WoW запускается в окне, то все нормально.
Пробовал вставлять мусорный и не очень код между ShellExecute и Sleep - не помогло. Что еще можно предпринять для исправления этого глюка?
__________________
РГРТУ - ФВТ - Системы Автоматизированного ПРоектирования. ت
Ответить с цитированием