Dateiendung mit dem eigenen Programm verknüpfen

[superjojo]

Hallo

Ich versuche mir einen eigenen Mediaplayer zu programmieren mit Delphi.
Nun möchte ich, dass wenn man eine Datei (Bsp .mp3) öffnet, dass diese automatisch mit meinem selbstgeschriebenen Programm geöffnet wird.

Habe schon mal gegoogelt und das hier gefunden
http://www.delphi-treff.de/tipps-tri...m-verknuepfen/

Habe auch den dort empfohlenen Code angewendet

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
if (ParamCount>0) and
    (FileExists(ParamStr(1))) then
   Memo1.Lines.LoadFromFile(ParamStr(1));
end;

Es kommt jedoch, wenn ich eine Datei mit meinem Programm öffne, eine Fehlermeldung (Siehe Bild im Anhang).

Habe auch gelesen, dass man irgendwie an die Verknüpfung mit dem Programm ein %1 anhängen müsste (Bsp C:\Project1.exe %1) aber wo muss ich das hinschreiben?