Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-08-2006
cheche cheche is offline
Registrado
 
Registrado: ago 2006
Posts: 1
Poder: 0
cheche Va por buen camino
Exclamation Cambiar icono de un exe desde delphi

Hola... a todos...

Mi problema es que quiero cambiar el icono de una aplicacion escrita en delphi y busque, y busque y econtre el siguiente codigo. pero en realidad no me ha funcionado (algo esoty haciendo mal) , puedo cambiar otros recursos pero el icono de una aplicacion no.. les agradecerias sus ideas

Código Delphi [-]
procedure TForm1.Button7Click(Sender: TObject); 
var Ico: TIcon; 
    Stream : TMemoryStream; 
    hInst: THandle; 
    ptr : Pointer; 
begin 
  Ico:=TIcon.Create; 
  Ico.LoadFromFile('c:\icon.ico'); 

  Stream := TMemoryStream.Create; 
  Ico.SaveToStream(Stream); 
  Ico.Free; 
  getmem (ptr, Stream.size + 1); 
  try 
    Stream.Seek(soFromBeginning, 0); 
    Stream.read(ptr^, Stream.size); 
    hInst:=BeginUpdateResource(Pchar('C:\MeineExe.exe'), False); 
    if hInst > 0 then 
    begin 
      UpdateResource(hInst, RT_GROUP_ICON, 'MAINICON', 1031, ptr, Stream.size); 
      EndUpdateResource(hInst, False); 
      end; 
  finally 
    freemem (ptr, Stream.size + 1); 
    stream.Free; 
  end; 

end;


Camibiar icono de un exe desde delphi
Camibiar icono de un ejecutable desde delphi
remplazar icono de un exe desde delphi
Responder Con Cita
Respuesta



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
Como salvar desde un programa en delphi con tu propio icono. Dragon Varios 3 14-04-2006 01:13:50
cambiar DNS desde delphi... User_baja1 Internet 0 13-09-2005 11:58:53
Cambiar configuracion tarjeta de Red desde Delphi Luis F. Orjuela API de Windows 0 02-09-2005 00:12:54
Cambiar icono de delphi el_barto Varios 4 24-06-2005 18:00:54
Cambiar direcciones IP y DNS de tarjeta red desde delphi ciscu Internet 3 07-06-2005 13:32:34


La franja horaria es GMT +2. Ahora son las 01:36:32.


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