Page 1 of 1

ERROR PICTURE TGET FWH 2002

Posted: Tue Mar 24, 2020 11:43 pm
by Ariel
Hola,
esta es la situacion :
Caso 1. NO muestra el borde en el GET

Code: Select all

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: Select all

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.

Re: ERROR PICTURE TGET FWH 2002

Posted: Tue Mar 24, 2020 11:55 pm
by Marcelo Roggeri
Hola, me pasa lo mismo
[img]
https://i.ibb.co/ZhPMPGs/rao1.png
https://i.ibb.co/Bn9zGZJ/rao2.png
[/img]

Saludos
Marcelo

Re: ERROR PICTURE TGET FWH 2002

Posted: Tue Mar 31, 2020 1:04 am
by nageswaragunupudi
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: Select all

          !Empty( ::cPicture ) .and. "Z" $ Upper( ::cPicture )
Please change it as:

Code: Select all

          !Empty( ::cPicture ) .and. "Z" $ Upper( ::cPicture ) .and. AppHasManifest()
This is fixed in FWH2003

Re: ERROR PICTURE TGET FWH 2002

Posted: Tue Mar 31, 2020 10:07 am
by Ariel
Mr. Rao,

Funciona perfecto!

Muchas gracias.