Dateiendung mit dem eigenen Programm verknüpfen

[superjojo]

1. Vielen Dank für die schnellen Antworten

2. @Puke Habe ich schon versucht, doch die dort angegebene Funktion wirft bei mir massenhaft Fehler auf. Da ich von dem was da in der Funktion steht so ziemlich gar nichts verstehe habe ich auch keine Ahnung wie ich die Fehler beheben soll.

3. @himitsu Also Im OnCreate event passiert nichts außer

Delphi-Quellcode:

if (ParamCount>0) and
    (FileExists(ParamStr(1))) then
   Memo1.Lines.LoadFromFile(ParamStr(1));

Auch sonst besteht mein Programm aus nur sehr wenigen Befehlen, die alle fehlerfrei abliefen bevor ich das OnCreate Event mit obigem Quellcode erzeugt habe. Jedoch habe ich bei dem TMediaPlayer der die Datei schließlich abspielen soll AutoOpen aktiviert.