Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   crear mis propios cursores (https://www.clubdelphi.com/foros/showthread.php?t=34896)

federiconqn21 24-08-2006 19:13:21

crear mis propios cursores
 
Hola a todos:
Estoy utilizando el Image Editor del Delphi 7 para crear mis propios cursores,la idea es crear un archivo ".RES" en donde creo mis cursores, ademas de Imagenes de mapa de bits,iconos, etc...
Mi duda es:Como vinculo mi nuevo recurso creado con mi aplicacion?.En principio lo guardo en la misma carpeta que mi proyecto.

luego cuando quiero programar un formulario hago lo siguiente
Código:

Const
            crMyCursor = 5;
          .
          .
          procedure TForm1.Create(..);
          begin
                  screen.Cursors[crMyCursor]:=LoadCursor(Hinstance,'mi_cursor')
                  // donde mi_cursor es el nombre de mi cursor creado
                  cursor:=crMyCursor;
          end;

luego cuando pongo en ejecucion mi programa,no pasa nada,es decir, no veo en pantalla mi nuevo cursor
Hice algo mal?
gracias a quien pueda despejarme de esta duda(consulte la ayuda del Image Editor y el ejemplo que encontre es el que estoy mostrando)
Salu2

dec 24-08-2006 22:15:05

Hola,

A veces he tenido algún problema similar. El código que muestras no parece estar mal. Lo que puede estar sucediendo es que el nombre del recurso no se encuentra, acaso porque tenga un nombre distinto, o su nombre esté en mayúsculas... o minúsculas...

Quiero decir que a veces es cuestión de hacer alguna que otra prueba hasta dar con la combinación de mayúsculas y minúsculas va bien. Aunque, me parece, se deberían siempre escribir los nombres de los recursos en mayúsculas y luego al cargarlos usar minúsculas...

En definitiva, creo que el código fuente que muestras no está mal, sino que el problema puede estar en el recurso: bien porque no se encuentre, no tenga el nombre adecuado, no sea "compatible"... etc., etc., etc.

Lepe 25-08-2006 10:38:18

Revisa el código fuente de una ventana, verás que tiene una linea como esta:
Código Delphi [-]

implementation

{$R *.DFM}

Eso quiere decir que incluya tambien el archivo formulario, pues dile que incluya tambien el archivo .res que haya en la misma carpeta:
Código Delphi [-]

implementation

{$R *.DFM}
{$R miarchivo.res}


Saludos

marcial 24-02-2010 14:30:23

Con este ejemplo me has salvado, gracias
 
Cita:

Empezado por Lepe (Mensaje 153629)
Revisa el código fuente de una ventana, verás que tiene una linea como esta:
Código Delphi [-]

implementation

{$R *.DFM}

Eso quiere decir que incluya tambien el archivo formulario, pues dile que incluya tambien el archivo .res que haya en la misma carpeta:
Código Delphi [-]

implementation

{$R *.DFM}
{$R miarchivo.res}


Saludos


Me has salvado porque esto no lo sabia y llevaba 10 días con "RECURSO NO ENCONTRADO"...gracias

rgstuamigo 24-02-2010 15:22:21

Cita:

Empezado por marcial (Mensaje 354878)
Me has salvado porque esto no lo sabia y llevaba 10 días con "RECURSO NO ENCONTRADO"...gracias

Bueno..ya sé que el hilo es un poco antiguito :rolleyes: pero...otra forma de meterle recursos a tu ejecutable es utilizando las opciones del IDE de Delphi tan solo te vas al menú Project>Resources , ahí te sale la ventanita llamada "Project Resources", donde sale todos los recursos que tu ejecutable tiene;;), si quieres agregar mas, pues tan solo dale Click Derecho dentro de dicha ventanita y pinchas en la opcion "New" y luego seleccionas el tipo de recurso que deseas agregar,permitiendote seleccionar el archivo origen del recurso.;)
Saludos...:)

marcial 25-02-2010 07:44:42

Mucho mejor todavía. Gracias por responder rgstuamigo.

Neftali [Germán.Estévez] 25-02-2010 10:56:28

Aunque veo que ya te han respondido, te subo al FTP un ejempillo que tengo por aquí dnde puedes ver cómo se emplean las máscaras para obtener transparencias en los cursores.

Y otro más similar de cuando estuve realizando pruebas...


marcial 25-02-2010 13:52:25

Neftalí........mira qué casualidad. Todo esto de los recursos viene de que estoy usando ese magnifico trabajo tuyo de enlazar con Google Maps y aparecerme el mensaje "Recurso no encontrado" cuando trato de adaptar el fuente en un programa mio. Dices en un hilo que has actualizado el ej1_googlelMaps con el problema resuelto pero el link esta roto. Yo lo he solucionado quitando el {$R *.RES} y poniendo {$R MAPARES.RES}.

Desde aquí te expreso mi admiración y gratitud al poner a disposición de todos este magnífico trabajo.

Un saludo

Neftali [Germán.Estévez] 25-02-2010 16:02:18

Cita:

Empezado por marcial (Mensaje 355032)
...Dices en un hilo que has actualizado el ej1_googlelMaps con el problema resuelto pero el link esta roto. Yo lo he solucionado quitando el {$R *.RES} y poniendo {$R MAPARES.RES}.

Me alegro de que te haya sido útil. :)

En cuento tenga un hueco le hecho un vistazo al error.


La franja horaria es GMT +2. Ahora son las 03:38:01.

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