Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #5  
Antiguo 14-08-2012
CSIE CSIE is offline
Miembro
 
Registrado: feb 2008
Ubicación: Universo paralelo
Posts: 69
Poder: 17
CSIE Va por buen camino
Creo que la solución es que tu propio programa preloader cree el acceso directo en el escritorio asignandole el icono correspondiente de la aplicación especificada en el ini.

Para ello puedes usar el interface IShellLink:

Código Delphi [-]
uses
  ShlObj,
  ActiveX;

var
  UnObject : IUnknown;
  ShelLink : IShellLink;

  if CoCreateInstance(CLSID_ShellLink, nil, CLSCTX_INPROC_SERVER or CLSCTX_LOCAL_SERVER, IUnknown, UnObject) <> S_OK then
  begin
    ...Error..
  end
  else
  begin
    ShelLink := UnObject as IShellLink;
    .....
    ShelLink.SetIconLocation([Ejecutable de la aplicacion con path], [Icono]);
    .....
  end;
  CoUninitialize();

Normalmente Icono por defecto será 0;
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Iconos para tu aplicación movorack Gráficos 16 25-04-2010 01:48:31
Como usar iconos diferentes en la misma aplicacion JoAnCa Varios 3 11-03-2009 17:16:10
Duda con aplicacion meme C++ Builder 6 13-12-2007 23:10:01
aplicacion detras de los iconos del escritorio gulder API de Windows 8 02-06-2005 11:38:08
Varios iconos en mi aplicacion jealousy Gráficos 2 23-10-2003 23:11:08


La franja horaria es GMT +2. Ahora son las 22:17:54.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi