Problema en FWH 27 build Marzo

Problema en FWH 27 build Marzo

Postby fgondi » Thu Mar 02, 2006 5:30 pm

Hola,

Al ejecutar el programa con el build de marzo me da el siguiente error:

Code: Select all  Expand view  RUN
   Error description: Error BASE/1079  Argument error: .OR.
   Args:
     [   1] = L   .F.
     [   2] = U   
Stack Calls
===========
   Called from: SAY.PRG => TSAY:SETTEXT ( 0 )
   Called from: win32.prg => MAIN ( 38 )


Para probarlo lo único que hay que incluir es el siguiente texto en el archivo "win32.prg" del directorio samples:

Code: Select all  Expand view  RUN
...
oSay:SetText( 'hola' )
ACTIVATE DIALOG oDlg CENTERED ;
  ON INIT ( oTabs:Add( "&Three" ),;
                oTabs:Add( "&Two" ),;
                oTabs:Add( "&One" ),;
                oTabs:nOption := 1,;
                oProgress:SetRange( 0, 200 ),;
                oProgress:SetPos( 50 ),;
                oAnimate:Search(),;
                oAnimate:Play() )


El error se produce siempre sobre un windows 2000. En los XP a veces funciona correctamente.

Este problema no lo tenía con ninguna versión anterior de FWH.

Gracias por vuestro tiempo
Un saludo
Fernando González Diez
ALSIS Sistemas Informáticos
User avatar
fgondi
 
Posts: 694
Joined: Fri Oct 07, 2005 6:58 am
Location: Palencia, España

Postby Biel EA6DD » Thu Mar 02, 2006 5:37 pm

A mi tambien me ha aperecido este error con la nueva versión.
Edita la clase TSay y busca el metodo SetText
Code: Select all  Expand view  RUN
METHOD SetText( cText ) CLASS TSay

   local hDC
   DEFAULT ::lTransparent := .f.  //<====Añade esta linea


A mi me funciona ok. Espero que te funcione.
El error depende en el momento en que llamas SetText, por ejmplo si en el codigo que has mandado antes, el oSay:SetText('hola') lo pones en el ON INIT, te funcionara bien.
Saludos.
Last edited by Biel EA6DD on Thu Mar 02, 2006 6:59 pm, edited 1 time in total.
User avatar
Biel EA6DD
 
Posts: 682
Joined: Tue Feb 14, 2006 9:48 am
Location: Mallorca

Postby fgondi » Thu Mar 02, 2006 5:57 pm

Hola

Muchas gracias, ahora funciona correctamente.

Lo que me queda la duda es si ocurrirá con alguna otra clase.
Un saludo
Fernando González Diez
ALSIS Sistemas Informáticos
User avatar
fgondi
 
Posts: 694
Joined: Fri Oct 07, 2005 6:58 am
Location: Palencia, España

Postby Antonio Linares » Thu Mar 02, 2006 6:05 pm

Gracias por la corrección. Es correcta.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42122
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Postby Antonio Linares » Thu Mar 02, 2006 6:28 pm

Modificado el setup de instalación de FWH.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 42122
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 24 guests