Programm starten durch button

[fwsp]

Delphi-Quellcode:

procedure MyShellExecute(Path: String);
begin
  ShellExecute(Application.Handle, 
              'open', PChar(Path), 
              '', Nil, SW_ShowNormal);
end;

MyShellExecute('D:\Programme\Teamspeak2_RC2\TeamSpeak.exe'); wie wär es so?