Club Builder

[Picard]

Hola de nuevo amigos,necesito trabajar con iconos en tiempo de ejecucion.
Dispongo de una serie de iconos en formato .ico y he de cargar un icono seleccionado al hacer click sobre el form en tiempo de ejecucion, he probado con "pastefromclipboard" y no chuta ¿me sirven los iconos .ico para este fin? como puedo hacerlo?
gracias

[_Viktor]

No logro entender tu problema... dices que tienes los iconos como archivos y que quieres cargarlos para mostrarlos en que ?? dices que ya les haces un click en el form, eso quiere decir que ya los tienes cargados ???

Saludos!
_________________
"Ser inteligente no es ser mas, solo equivocarse menos y no usar Visual Basic"
Atte.
Victor Yañez
Apoyen el Proyecto OpenSource del Club Builder. Ya tenemos componentes Listos!!!

[Picard]

me expliqué mal,perdon.
en un form tengo varios TPanel,en uno de ellos tengo cargados una serie de iconos .ico lo que quiero es que al hacer click en algun icono se copie a uno de los otros paneles durante la ejecucion del programa.
gracias

[_Viktor]

Hola, si lo que quieres es simplemte copiar el icono de un TImage a otro, asumiendo que estes usando TImage, tienes que hacer solo lo siguiente:

[kalux]

No se si es esto lo que quieres:

Asumo que quieres utilizar varios iconos en tiempo de ejecucion:

Para ello vamos a utilizar los ficheros de recursos (*.rc)

Lo primero que debemos hacer para que forme parte del fichero de recursos es preparar un archivo de texto (File -> New y clic sobre el icono Text).

Este debe contener la línea siguiente:

nombre_interno tipo_recurso nombre_del_archivo

Donde:

nombre_interno : es el nombre que se especificará en el archivo CPP para designar la imagen.

tipo_recurso :es una palabra reservada. Esta palabra puede ser:
BITMAP : para imágenes.
ICON : para iconos.
CURSOR : para cursores.

En este caso ICON

nombre_del_archivo : es el nombre del archivo de imagen (no es necesario dar el nombre completo del archivo si este archivo se encuentra en el directorio del proyecto).

Por ejemplo:
alarma ICON c:\iconos\alarm.ico


Este archivo de texto debe ser:

- guardado con la extensión RC. Asigna a este archivo un nombre distinto al del proyecto (para que no haya confusión con el archivo de recursos ya existente y que tiene la extensión RES);

- inclúyelo en el proyecto de la aplicación: View -> Project manager y añádelo al proyecto.


Declaras como variable global (al principio del archivo CPP, antes del primer método):

HICON hicon;

Donde :

HICON es una palabra reservada.

hicon será como le llamaremos en la aplicación (puede ser cualquier nombre).

Para cargar el icono, insertaremos la siguiente linea:

hicon = LoadIcon (HINSTANCE) Hinstance, “nombre_interno”);

donde nombre_interno debe reemplazarse por el nombre interno que haya dado a la imagen ( a la izquierda de la palabra reservada ICON).

Ejemplo:

En el fichero de recurso:

alarma ICON d:\iconos\alarm.ico

Como variable global:

HICON otroicon;

Y cuando queremos cambiar la imagen:

otroicon = LoadIcon((HINSTANCE)HInstance,"alarma");

Para cambiar el icono de la ventana y el de la aplicación:

Form1->Icon->Handle=otroicono;
Application->Icon->Handle=otroicono;

Siendo Form1 el nombre de la ventana

Y si es para un TPanel pues es lo mismo.

Y si no es esto lo que quieres, pues bueno aqui la explicacion de como utilizar los ficheros de recursos.