topic-38675

Posts: 389

Joined: Wed Nov 29, 2006 01:51 PM

ERROR PICTURE TGET FWH 2002
Posted: Tue Mar 24, 2020 11:43 PM

Hola,
esta es la situacion :
Caso 1. NO muestra el borde en el GET

Local aVar:= {=>}
aVar["number"]:= 0

@ nRow-3, nCol+95 GET ::aDatax["number"] VAR aVar["number"] ;
                           OF ::hLays["FOLDER_H1"]:aVLayout[1] ;
                           SIZE 60, 20 PIXEL  ;
                           PICTURE "@Z 9999" ;
                           UPDATE

Caso 2. muestra el borde en el GET

Code (fw): Select all Collapse

Local aVar:= {=>}
aVar["number"]:= 0

@ nRow-3, nCol+95 GET ::aDatax["number"] VAR aVar["number"] ;
                           OF ::hLays["FOLDER_H1"]:aVLayout[1] ;
                           SIZE 60, 20 PIXEL  ;
                           UPDATE

resumiendo, si saco el PICTURE me muestra el borde del GET sino NO lo muestra.

Saludos.

Marcelo Roggeri

Posts: 344

Joined: Sat Jul 22, 2006 09:04 PM

Re: ERROR PICTURE TGET FWH 2002
Posted: Tue Mar 24, 2020 11:55 PM

Hola, me pasa lo mismo

https://i.ibb.co/ZhPMPGs/rao1.png
https://i.ibb.co/Bn9zGZJ/rao2.png
" alt="" loading="lazy">

Saludos
Marcelo

FWH - Harbour - BCC7 - PellesC

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: ERROR PICTURE TGET FWH 2002
Posted: Tue Mar 31, 2020 01:04 AM

This problem is in FWH2002 when manifest is not linked.

Please make this modification in tget.prg of FWH2002

Please see line number 2447 in the method Paint()

Code (fw): Select all Collapse

          !Empty( ::cPicture ) .and. "Z" $ Upper( ::cPicture )

Please change it as:

Code (fw): Select all Collapse

          !Empty( ::cPicture ) .and. "Z" $ Upper( ::cPicture ) .and. AppHasManifest()

This is fixed in FWH2003

Regards

G. N. Rao.

Hyderabad, India

Ariel

Posts: 389

Joined: Wed Nov 29, 2006 01:51 PM

Re: ERROR PICTURE TGET FWH 2002
Posted: Tue Mar 31, 2020 10:07 AM

Mr. Rao,

Funciona perfecto!

Muchas gracias.

FiveTech Support Forums

Continue the discussion