Externes Programm starten

[sebjensen]

Hallo,

ich habe mir aus der CodeLibrary den Code geholt um zu überprüfen, ob ein bestimmtes Programm auf den Rechner installiert ist.

Hier sonst nochmal der Code

Code:

function ProgIDExists(const ProgID: WideString): Boolean; 
var
  Tmp: TGUID; 
begin 
  Result := Succeeded(CLSIDFromProgID(PWideChar(ProgID), Tmp)); 
end;

So, nun wollte ich gerne eine "Kommandozentrale" basteln, aus der man die Programme von MS Office starten kann. Dazu wird erst überprüft, ob das Programm installiert ist und dann soll es automatisch gestartet werden, falls das Programm installiert ist.

Wie kann ich jetzt dieses automatische Starten realisieren?
Wäre super, wenn mir jemand helfen könnte.