Всем привет!

Пытаюсь запустить программу в минимизированном виде:

   shellexecute(0,nil,'C:\WINDOWS\system32\calc.exe', '','',SW_MINIMIZE);//или SW_SHOWMINIMIZED или SW_SHOWMINNOACTIVE

запускается не минимизированно
пробую через createprocess:

var
   StartInfo   : TStartupInfo;
   ProcInfo    : TProcessInformation;
begin
   GetStartupInfo(StartInfo);
   StartInfo.wShowWindow := SW_SHOWMINNOACTIVE;//или SW_SHOWMINIMIZED или SW_SHOWMINNOACTIVE
   StartInfo.dwFlags:=STARTF_USESHOWWINDOW;
   CreateProcess(nil, 'C:\WINDOWS\system32\calc.exe', nil, nil, false, 0, nil, nil, StartInfo, ProcInfo);

тажа фигня.
Пишу в D5 under XP
Как же всё-таки запустить его минимизированно??