Frage

Wie erstellen Sie Ihren eigenen benutzerdefinierten Moniker (oder URL-Protokoll) auf Windows-Systemen?

Beispiele:

  • http:
  • mailto:
  • Service:

Andere Tipps

Hier ist ein alter Delphi-Code, den wir verwendet haben, um Verknüpfungen in einer Webanwendung zu erhalten, um ein Windows-Programm lokal für den Benutzer zu starten.

procedure InstallIntoRegistry;
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CLASSES_ROOT;
    if Reg.OpenKey('moniker', True) then
    begin
      Reg.WriteString('', 'URL:Name of moniker');
      Reg.WriteString('URL Protocol', '');
      Reg.WriteString('Source Filter', '{E436EBB6-524F-11CE-9F53-0020AF0BA770}');
      Reg.WriteInteger('EditFlags', 2);

      if Reg.OpenKey('shell\open\command', True) then
      begin
        Reg.WriteString('', '"' + ParamStr(0) + '" "%1"');
      end;
    end else begin
      MessageBox(0, 'You do not have the necessary access rights to complete this installation!' + Chr(13) +
        'Please make sure you are logged in with a user account with administrative rights!', 'Access denied', 0);
      Exit;
    end;
  finally
    FreeAndNil(Reg);
  end;

  MessageBox(0, 'Application WebStart has been installed successfully!', 'Installed', 0);
end;

Innerhalb von OLE von Craig Brockschmidt bietet wahrscheinlich die beste Berichterstattung über Spitznamen.Wenn Sie etwas tiefer in dieses Thema eintauchen möchten, empfehle ich Ihnen, sich dieses Buch zu besorgen.Es ist auch auf der MSDN-Diskette enthalten, die mit VS 6.0 geliefert wurde, falls Sie diese noch haben.

Lizenziert unter: CC-BY-SA mit Zuschreibung
Nicht verbunden mit StackOverflow
scroll top