sintaxis de BitMap

Post Reply
jcdeleon
Posts: 4
Joined: Mon May 08, 2017 10:41 am

sintaxis de BitMap

Post 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.
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: sintaxis de BitMap

Post by Antonio Linares »

Puedes mostrar un ejemplo PRG de cómo lo estás haciendo ?

Una imagen también ayudaría mucho
regards, saludos

Antonio Linares
www.fivetechsoft.com
jcdeleon
Posts: 4
Joined: Mon May 08, 2017 10:41 am

Re: sintaxis de BitMap

Post 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
jcdeleon
Posts: 4
Joined: Mon May 08, 2017 10:41 am

Re: sintaxis de BitMap

Post 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
jcdeleon
Posts: 4
Joined: Mon May 08, 2017 10:41 am

Re: sintaxis de BitMap

Post 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
Post Reply