Ayuda para Leer JPG desde una DBF *SOLUCIONADO*

Posts: 719

Joined: Fri May 12, 2017 02:50 PM

Ayuda para Leer JPG desde una DBF *SOLUCIONADO*
Posted: Mon Jul 04, 2022 11:37 PM

Hola Amigos.

Tengo almacenado un archivo JPG en un campo memo, según ejemplo de Mr. Rao, pero no encuentro como leerla, para imprimirla en un documento usando PRINT?

    cFirma:=&quot;C:\Desa\Sistema\Jpg\Firmas\Firma_Arel_Final.JPG&quot;

Field-&gt;Fir_Med:= MEMOREAD(cFirma)              // Grabo la Firma en el campo MEMO de DBF

Necesito poder leerla, para imprimirla en Dcto.

Saludos
Antonio

FWH 22.10 - HARBOUR - PELLES C

acuellar

Posts: 1710

Joined: Tue Oct 28, 2008 06:26 PM

Re: Ayuda para Leer JPG desde una DBF
Posted: Tue Jul 05, 2022 02:42 PM

Estimado Antonio

Intenta con SETBMP

Code (fw): Select all Collapse

oImage:SetBmp(oDBF->IMAGEN)

Saludos,

Adhemar C.

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Ayuda para Leer JPG desde una DBF
Posted: Tue Jul 05, 2022 03:44 PM

Code (fw): Select all Collapse

   cImage := FIELD->Fir_med
   @ 2.0, 2.0 PRINT TO oPrn IMAGE cImage SIZE 5.0, 4.0 INCHES

Regards

G. N. Rao.

Hyderabad, India

remtec

Posts: 719

Joined: Fri May 12, 2017 02:50 PM

Re: Ayuda para Leer JPG desde una DBF
Posted: Tue Jul 05, 2022 05:02 PM

acuellar wrote:Estimado Antonio

Intenta con SETBMP
Code (fw): Select all Collapse
oImage:SetBmp(oDBF->IMAGEN)

Hola Adhemar C.

Muchas gracias por tu ayuda.

Intente con tu sugerencia, pero me arrojo un error en la ejecución.

Error occurred at: 05/07/2022, 11:22:31
Error description: Error BASE/1004 Message not found: TPRINTER:SETBMP
Args:
[ 1] = O TPRINTER

Pero justo me llego la sugerencia de Mr. Rao, por lo que no insistí con tu indicación.

Saludos y muchas gracias.

Antonio

FWH 22.10 - HARBOUR - PELLES C

remtec

Posts: 719

Joined: Fri May 12, 2017 02:50 PM

Re: Ayuda para Leer JPG desde una DBF
Posted: Tue Jul 05, 2022 05:04 PM

nageswaragunupudi wrote:
Code (fw): Select all Collapse
   cImage := FIELD->Fir_med
   @ 2.0, 2.0 PRINT TO oPrn IMAGE cImage SIZE 5.0, 4.0 INCHES

Buen dia Mr. Rao

Muchas gracias por su ayuda.

Me funciono perfecto.

Muchos saludos

Antonio

FWH 22.10 - HARBOUR - PELLES C

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Ayuda para Leer JPG desde una DBF
Posted: Fri Jul 08, 2022 12:44 AM

remtec wrote:
nageswaragunupudi wrote:
Code (fw): Select all Collapse
   cImage := FIELD->Fir_med
   [code]@ 2.0, 2.0 PRINT TO oPrn IMAGE cImage SIZE 5.0, 4.0 INCHES[/code]
Buen dia Mr. Rao

Muchas gracias por su ayuda.

Me funciono perfecto.

Muchas saludos

Antonio

From the next version, it is not necessay to use cImage := FIELD->FIR_MED

We can directly use field name in the command

Code (fw): Select all Collapse

@ 2.0, 2.0 PRINT TO oPrn IMAGE FIELD->FIR_MED SIZE 5.0, 4.0 INCHES

Regards

G. N. Rao.

Hyderabad, India

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Ayuda para Leer JPG desde una DBF
Posted: Fri Jul 08, 2022 12:44 AM

remtec wrote:
nageswaragunupudi wrote:
Code (fw): Select all Collapse
   cImage := FIELD->Fir_med
   [code]@ 2.0, 2.0 PRINT TO oPrn IMAGE cImage SIZE 5.0, 4.0 INCHES[/code]
Buen dia Mr. Rao

Muchas gracias por su ayuda.

Me funciono perfecto.

Muchas saludos

Antonio

From the next version, it is not necessay to use cImage := FIELD->FIR_MED

We can directly use field name in the command

Code (fw): Select all Collapse

@ 2.0, 2.0 PRINT TO oPrn IMAGE FIELD->FIR_MED SIZE 5.0, 4.0 INCHES

Regards

G. N. Rao.

Hyderabad, India

remtec

Posts: 719

Joined: Fri May 12, 2017 02:50 PM

Re: Ayuda para Leer JPG desde una DBF *SOLUCIONADO*
Posted: Fri Jul 08, 2022 02:12 PM

Mr. Rao

Muchas gracias.

Estare atento, reitero por favor solicitud de Cesar, sobre poder extraer Cabecera y Pie de pagina en archivos RTF, asi podremos modificalar por medio de variables.

Muchos saludos.

Antonio

FWH 22.10 - HARBOUR - PELLES C

FiveTech Support Forums

Continue the discussion