Pergunta

Como você criar seu próprio apelido (ou Protocolo de URL) em sistemas Windows?

Exemplos:

  • http:
  • mailto:
  • serviço:

Outras dicas

Veja aqui algumas antigo código do Delphi foi utilizada como uma forma de obter atalhos em um aplicativo da web para iniciar um programa do windows localmente para o usuário.

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;

Dentro de OLE a partir de Craig Brockschmidt e provavelmente tem a melhor cobertura sobre identificadores de origem.Se você quiser se aprofundar um pouco mais este tema, eu recomendo começar este livro.Ele também está contido no MSDN disco que veio junto com VS 6.0, no caso de ainda ter que.

Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow
scroll top