Dateiverknüpfung -> Fehler

[rebugger]

Ich verknüpfe eine Dateiendung mit meinem Programm wie folt:

Delphi-Quellcode:

  docTypeName := 'Mein Programm';
  with Reg do
  begin
    RootKey := HKEY_CLASSES_ROOT;

    OpenKey(Extension, TRUE);
    WriteString('', docTypeName);
    DeleteKey('Shell');
    DeleteKey('DefaultIcon');
    CloseKey;

    OpenKey(docTypeName + '\Shell', True);
    WriteString('', 'Open');
    CloseKey;
    OpenKey(docTypeName + '\Shell\Open\Command', True);
    WriteString('', '"' + Application.ExeName + '" "%1"');
    CloseKey;
    OpenKey(docTypeName + '\DefaultIcon', True);
    WriteString('', Application.ExeName + ',1');
    CloseKey;
  end;
  Reg.Free;

Wenn ich jetzt z.B. die Dateiendung .php mit meinem Programm verknüpfe und dann im irc-Chat (z.B. über mIRC) einen Link mit Endung .php aufrufe, wird mein Programm geöffnet und nicht der Browser.
Wie kann ich den Fehler beheben ?

[MrKnogge]

Die Endung php wieder mit dem Browser verknüpfen !?