Command Boton con Imagen y otros
Publicado por Guillermo (1 intervención) el 27/07/2009 21:44:45
Estimados,
Estando en un proyecto y habiendo sido desarrollado con PB 9, un grupo de ingenieros desarrollamos unas rutinas para permitir que los commandbutton pudiesen tener imagenes, similar a los picturebuttons, pero en forma decente (como los de delphi) Para ello definimos en "LOCAL EXTERNAL FUNCTIONS" Varias llamadas.....(de muestra sólo unas poquitas....)
FUNCTION uLong GetWindowuLong(uLong hwnd, uLong nIndex) Alias For GetWindowLongA LIBRARY "USER32.DLL"
FUNCTION uLong SetWindowuLong(uLong hwnd, uLong nIndex,uLong dwNewLong) Alias For SetWindowLongA LIBRARY "USER32.DLL"
FUNCTION ulong FillRect(ulong hdc,ref tagrect lpRect,ulong hBrush) LIBRARY "user32.dll" alias for "FillRect;Ansi"
FUNCTION long FN_ResGetIconID(string lpLibFileName) LIBRARY "PBVM90.dll" alias for "FN_ResGetIconID;Ansi"
En esa oportunidad utilizamos el PBVM90....
Bueno termino el proyecto y deje por unos buenos años PB9. He migrado estas utilidades a PB11.5 y los botones funcionan pero no es capaz de mostrar la imagen asociada. A pesar de que cambie el PBVM90.dll por el PBVM115.dll.-
Sé que esta es una pregunta para avanzados en Powerbuilder. Si alguién sabe de lo que estoy hablando, si puede ayudarme.
Atte.
Guillermo
Estando en un proyecto y habiendo sido desarrollado con PB 9, un grupo de ingenieros desarrollamos unas rutinas para permitir que los commandbutton pudiesen tener imagenes, similar a los picturebuttons, pero en forma decente (como los de delphi) Para ello definimos en "LOCAL EXTERNAL FUNCTIONS" Varias llamadas.....(de muestra sólo unas poquitas....)
FUNCTION uLong GetWindowuLong(uLong hwnd, uLong nIndex) Alias For GetWindowLongA LIBRARY "USER32.DLL"
FUNCTION uLong SetWindowuLong(uLong hwnd, uLong nIndex,uLong dwNewLong) Alias For SetWindowLongA LIBRARY "USER32.DLL"
FUNCTION ulong FillRect(ulong hdc,ref tagrect lpRect,ulong hBrush) LIBRARY "user32.dll" alias for "FillRect;Ansi"
FUNCTION long FN_ResGetIconID(string lpLibFileName) LIBRARY "PBVM90.dll" alias for "FN_ResGetIconID;Ansi"
En esa oportunidad utilizamos el PBVM90....
Bueno termino el proyecto y deje por unos buenos años PB9. He migrado estas utilidades a PB11.5 y los botones funcionan pero no es capaz de mostrar la imagen asociada. A pesar de que cambie el PBVM90.dll por el PBVM115.dll.-
Sé que esta es una pregunta para avanzados en Powerbuilder. Si alguién sabe de lo que estoy hablando, si puede ayudarme.
Atte.
Guillermo
Valora esta pregunta
0