ShellExecute mit Leerzeichen

[himitsu]

Zitat:

Delphi-Quellcode:

      while IsExeRunning(ExtractFileName(lpFile)) do
       begin
        TShellExecEx.seDelay(25);

        if bProcessMessages then
         Application.ProcessMessages;
       end;
     end;

bProcessMessages ?

Dein seDelay macht das doch bereits, nur dass dort viele Sachen falsch/garnicht behandelt werden.
z.B. HotKeys und Menü-Ereignisse sind falsch oder gehen verloren.

Da kannst'e genauso gut im seDelay direkt das Application.ProcessMessages oder Application.HandleMessage; benutzen.

Dieser Parameter ist so oder so sinnlos, da immer Messages behandelt werden.

Zitat:

Tick := GetTickCount + DWord(Milliseconds);

In neuen Delphi-Projekten ist jetzt die Index- und Bereichsprüfung standardmäßig aktiv.
Nach 49,7 Tagen gibt es einen Überlauf und wenn du Diesen gut triffst, dann knallt es.

PS: TFile.Exists und TDirectory.Exists