Externe Anwendung unter XP & Vista öffnen

[AlexII]

Hallo

Ich möchte mit diesem Code eine externe Anwendung bzw. den WindowsTaschenrechner öffnen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if ShellExecute(Application.Handle,
                 'open',
                 PChar('C:\WINDOWS\system32\calc.exe'),
                 Nil, Nil, SW_NORMAL) <= 32 then
    ShowMessage('Es ist ein Fehler aufgetreten');
end;

jetzt die Frage: wie muss ich diesen Code anpassen, dass der Taschenrechner unter XP und Vista geöffnet wird?