bugs FW14.06

Re: bugs FW14.06

Postby elvira » Mon Jun 30, 2014 8:12 pm

Manuel,

Muchas gracias, parece que se va viendo bien:

Image

Entonces, ¿el problema no es de la clase tmetafil.prg?.
elvira
 
Posts: 516
Joined: Fri Jun 29, 2012 12:49 pm

Re: bugs FW14.06

Postby mastintin » Mon Jun 30, 2014 9:54 pm

Realmente el unico cambio que tenemos que hacer en la clase original es añadir el menu a mdichild . No preguntes el motivo , pues no lo sé , pero resuelve el problema .Mirando versiones anteriores ( la 13.06 ) no llevaba esto y no se producía el problema . ¿?
El problema ademas es que si deseamos quitar el menu no podremos .

Code: Select all  Expand view  RUN

METHOD BuildWindow() CLASS TPreview
......

  if ! ::oDevice:lPrvModal .and. ::oWndMain != nil .and. ;
      Upper( ::oWndMain:ClassName() ) == "TMDIFRAME"
      DEFINE WINDOW ::oWnd ;
         TITLE cTitle ;
         COLOR CLR_BLACK,CLR_LIGHTGRAY ;
         ICON  oIcon ;
         VSCROLL HSCROLL MDICHILD MENU ::BuildMenu()   // añadir la creación de menu en el mdichild  

......

 
User avatar
mastintin
 
Posts: 1516
Joined: Thu May 27, 2010 2:06 pm

Re: bugs FW14.06

Postby nageswaragunupudi » Mon Jun 30, 2014 11:07 pm

mgsoft wrote:Elvira,

Hay un bug en el método CreateButton() de la clase tGet.prg

Busca este código:

if ValType( ::bAction ) == "B" .and. Upper( ::ClassName() ) == "TGET"


Sin embargo, debería ser en realidad Upper( ::Super:ClassName() ), porque si hacemos una clase derivada de TGET como es el caso de AutoGet entonces no funcióna el botón.

Prueba y me dices.

We have adopted this change for the next release:
Code: Select all  Expand view  RUN
if ValType( ::bAction ) == "B" .and. ::IsKindOf( "TGET" )
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10646
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: bugs FW14.06

Postby nageswaragunupudi » Mon Jun 30, 2014 11:15 pm

Preview problem:

The problem occurs only for non-modal previews in MDI environment. The problem is not created in 14.06 but has been there for a very long time till 14.06.

Fix:
Please locate the first line in the method SetFactor( nValue ) of TPreview. This is the present code.
Code: Select all  Expand view  RUN
  local lInit := .F.
 

Please replace change this as:
Code: Select all  Expand view  RUN
  local lInit := ( PCount() == 0 )
 

This fix is included in the next release and this fix works for all previous versions where the problem existed.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10646
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: bugs FW14.06

Postby mgsoft » Tue Jul 01, 2014 4:44 am

Dear Mr. Nages,

When those changes would be available?.

I plan to catch de FWH64 bits offer.

Yours sincerely
Saludos,

Eduardo
User avatar
mgsoft
 
Posts: 422
Joined: Mon Aug 17, 2009 12:18 pm
Location: España

Re: bugs FW14.06

Postby nageswaragunupudi » Tue Jul 01, 2014 5:15 am

Any release from this moment onwards will have this fix.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10646
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Previous

Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: D.Fernandez, Google [Bot] and 38 guests