После перевода проекта на 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 - не помогло. Что еще можно предпринять для исправления этого глюка?