Page 1 of 1

sintaxis de BitMap

PostPosted: Mon May 08, 2017 1:00 pm
by jcdeleon
Hola buen dia, tengo una opcion Verificador de Precios; en clipper 5.03, necesito desplegar la imagen del producto, he tratado de hacerlo en fivewin, pero no he podido controlar la posicion y tamaño de la imagen, esto para ejecutarlo desde clipper.. de antemano Muchas Gracias.

Re: sintaxis de BitMap

PostPosted: Mon May 08, 2017 4:42 pm
by Antonio Linares
Puedes mostrar un ejemplo PRG de cómo lo estás haciendo ?

Una imagen también ayudaría mucho

Re: sintaxis de BitMap

PostPosted: Tue May 16, 2017 11:02 pm
by jcdeleon
Sr Linares por anticipado Gracias por la atencion, el siguiente es la rutina que he tratado de usar par desplegar una imagen .bmp :

#include "FiveWin.ch"
function Main()

* local ruta := "e:\lapdell\jj\mdulce\verif\paris.bmp"
local ruta := "paris.bmp"
BmpPresenta( ruta, "VERIFICADOR DE PRECIOS" )
return nil

function BmpPresenta( cBmp, cTitulo )
local oWnd, oBmp
DEFAULT cTitulo := "Muestra imagen"
if file( cBmp )
DEFINE BITMAP oBmp FILE cBmp
DEFINE DIALOG oWnd TITLE cTitulo ;
SIZE oBmp:nWidth(), oBmp:nHeight PIXEL

ACTIVATE DIALOG oWnd CENTERED ;
ON PAINT PalBmpDraw( hDC, 300, 300, oBmp:hBitmap )
* ON PAINT PalBmpDraw( hDC, 0, 0, oBmp:hBitmap )

oBmp:End()
else
MsgAlert( "..Archivo Inexistente !" )
endif

return nil

cuando uso los parametros 0, 0 despliega la imagen completa abarcando toda la ventana; si uso 300, 300 mueve la imagen al extremo inferior derecho pero incompleta. mi necesidad es desplegar la imagen completa , llamandola desde la aplicacion en clipper ..

Gracias, por el apoyo

Re: sintaxis de BitMap

PostPosted: Sun Jun 11, 2017 9:18 pm
by jcdeleon
Sr. Linares, entiendo lo valioso de su tiempo, aun no tengo respuesta o sugerencia respecto a mi peticion sobre el desplegar imagen .bmp sobre una consulta desde clipper 5.3... para un verificador de precios..
Gracias Anticipadas

Re: sintaxis de BitMap

PostPosted: Thu Jun 22, 2017 12:08 pm
by jcdeleon
para imprimir un codigo de barras bidimensinal cbb utilizo:
Oprinter:SayBitMap(pos1, pos2, "salida.bmp", tam1, tam2)
de que depende que algunas imagenes si se imprimen y otras no...
habra que configura algunos parametros

Gracias