Page 1 of 1
scroll Horizonta y Vertical en una Window
Posted: Fri May 05, 2006 6:13 pm
by infosys
Necesito mostrar una imagen en formato bmp cuyo tamano es mayor que la capacidad de la pantalla del Pocket Pc. Mi idea es mediante una Window con barras de desplazamiento vertical y horizontal, pero no logro que la imagen se desplace al mover las barras, alguien tiene algun ejemplo o alguna idea sobre este tema?
Gracias
Miguel
Posted: Wed May 10, 2006 8:08 am
by Antonio Linares
Miguel,
Vamos a intentar proporcionarte un ejemplo lo antes posible. Disculpa nuestro retraso en responderte. Gracias.
Posted: Wed May 31, 2006 11:47 pm
by infosys
Antonio, Gracias de todos modos ya logre resolverlo.
Saludos
Miguel
Posted: Thu Jun 01, 2006 6:49 am
by Antonio Linares
Miguel,
Te importaría mostrarnos el código en un pequeño ejemplo para que le sirva así a otros usuarios ? Gracias.
Posted: Thu Jun 01, 2006 4:40 pm
by infosys
Si Antonio, disculpa, es que se me paso.
El codigo es mas simple de lo que parece y resulta de maravillas.
#include "FWCE.ch"
#include "WINAPI.ch"
Static oWnd
Function Main()
local oBmp
DEFINE WINDOW oWnd TITLE "GRILLA DE PERFORACION";
MENU BuildMenu()
@ 1, 1 BITMAP oBmp FILENAME Curdir() + "\malla.bmp" SIZE 230,255 SCROLL of oWnd
ACTIVATE WINDOW oWnd
oBmp:End()
Return Nil
//------------------------------------------
Function BuildMenu()
//------------------------------------------
Local oMenu
DEFINE oMenu RESOURCE 102
REDEFINE MENUITEM ID 100 of oMenu ACTION .....
REDEFINE MENUITEM ID 110 of oMenu ACTION oWnd:End()
Return oMenu
Espero que les sirva
Saludos
Posted: Thu Jun 01, 2006 9:01 pm
by Antonio Linares
gracias
