[Componente] Control de PowerCobol

[Nitzer]

Hola, os voy a contar que igual no sabéis, pero para hacerlo mas interesante ... os cuento toda la historia

Como sabéis, la mayoría de controles en los que se permite utilizar imágenes podemos asignarlas insertando la imagen en el propio componente, pero si queremos que la imagen pueda cambiar en tiempo de ejecución tenemos un problema, ya que la mayoría requieren que la imagen se la pasemos como objeto "PICTURE".

Para pasar imágenes entre controles yo utilizo el ctImage de DBITech, que te permite tener hasta 50 imágenes en el formulario y usarlas en cualquier control, por ejemplo cambiar imágenes en algún botón, como imágenes en algún grid, etc ...

Pero aún así cuando en realidad no sabemos que imagen vamos a poner, por ejemplo la foto de un trabajador ( no podemos meter todas en el ctImage), o una firma digitalizada de documentos, etc ..
En esa situación yo utilizaba un control que compré hace tiempo llamado ImageX, donde puedes cargar una imagen del disco con el método "load" y luego con la propiedad Picture pasarla a cualquier control.

Hasta aquí una historia mas de cualquier programador. Pero el otro día me doy cuenta que cuando llamo a un formulario con ese control insertado (ImageX), me cambia el PATH de windows, con lo que me ..... muchos programas y tengo que estar confirmando donde estoy situado, ya que muchas cosas las llamo \carpeta, partiendo de donde está el ejecutable.

Cansado de todo esto, me digo "coño" si el control image de Power tuviera una propiedad del tipo Picture, con lo fácil que es utilizarlo, estaría salvado, pero no la tiene ..... o si ?¿

Como no suelo rendirme pronto, empiezo a investigar donde están los controles de power y están agrupados en varios ficheros ocx en la carpeta donde instalamos el compilador.
Una vez localizados, empiezo a buscar por Internet algún programa que me permita "decompilar" dichos ficheros y encuentro uno llamado: LibDump.exe... y aquí empieza la aventura



Lo ejecuto, busco cada uno de los ocx de cobol y empiezo a ver "cosas" y encuentro el control Image de Power y empiezo a ver sus propiedad y ...... sorpresa:



TIENE LA PROPIEDAD tipo PICTURE llamada IMAGE, pero pone hidden, como ?¿?¿?
Pues que es una propiedad que no te sale en el compilador, pero que si la pones no da errores al compilar y funciona perfectamente.

Ya tenemos la solución, podemos tomar cualquier fichero de imagen desde nuestro disco y luego utilizar esa imágen en cualquier otro ocx que tengamos en el formulario.

Y fin de la historia, espero que no haya sido un ladrillazo ))

PD: He investigado todos los controles y no he visto mucho mas llamativo, aunque si varias cosas hidden que seguro que funcionan. Pero para mi ésta ha sido increible.
Lo he programado ya y ha quedado perfecto.

[Fito]

Hola Andrés. Brillante lo tuyo. Voy a probar por ese lado

Saludos

Fito

[Kuk]

@Nitzer, muy bueno, sí señor!!

Esto es lo mismo que la propiedad hwnd de cualquier control de PowerCobol, que no sale en la lista, pero está ahí y funciona perfectamente!

[Nitzer]

Efectivamente @kuk, no lo puse, pero si lo he usado en varias ocasiones. Hwnd devuelve el "handle" de cualquier control de Power.