FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Dsay e Ssay não mostram texto comfwh 2.7
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
Dsay e Ssay não mostram texto comfwh 2.7
Posted: Tue Feb 21, 2006 11:49 AM
Olá Pessoal,

Quais as mudanças que tenho que fazer nas classes SSAY.PRG e DSAY.PRG para que funcionem com o fwh 2.7 ?

Vejam abaixo o mesmo programa compilado com SSAY e o SAY nativo do fwh:



Obrigado,

Rossine.
Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
Dsay e Ssay não mostram texto comfwh 2.7
Posted: Tue Feb 21, 2006 11:54 AM
Olá,

Já tentei isto e não funcionou:

...
METHOD Paint() CLASS TSSay

   local n 
   local nColorShadow, nColorLight

  [color=red]DEFAULT ::lTransparent := .f.   && AQUI[/color]

   if ::nClrLight = Nil
      nColorLight := GetSysColor( COLOR_BTNHIGHLIGHT )
   else
      nColorLight := ::nClrLight
   endif

   ::GetDC()

   if ::lActive
[color=red] *AQUI
      if ::lTransparent .and. ! Empty( ::oBrush:hBitmap ) 
         SetBrushOrgEx( ::hDC, nBmpWidth( ::oBrush:hBitmap ) - ::nLeft, nBmpHeight( ::oBrush:hBitmap ) - ::nTop ) 
         FillRect( ::hDC, GetClientRect( ::hWnd ), ::oBrush:hBrush ) 
      endif [/color]

      for n := 1 to len( ::aCaption )
...


Obrigado,

Rossine.
Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Dsay e Ssay não mostram texto comfwh 2.7
Posted: Tue Feb 21, 2006 12:53 PM

LOCAL IDCor

//--- Melhoria visual nos say's
For IDCor=501 to 520
    REDEFINE SENSITIVE SAY ID iDcor ;
    COLOR CLR_HRED       OF oDlg    ;
    UPDATE                          ;
    BOX RAISED                      ;
    CENTER                          ;
    FONT oFont
Next IDCor  // By Ednaldo Rolim - Yes!

http://www.fivewin.com.br/exibedicas.asp?id=609

http://www.fivewin.com.br/dicas/ssay.zip

http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=6393

http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=5779

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Como hacen esos globos
Posted: Wed Feb 22, 2006 01:49 PM

Cambiando de tema, he estado leyendo los mensajes que mandaron y me causa curiosidad los globos que salen del GET, seran que no tienen un ejemplito sobre esto?

leandroalfonso111@hotmail.com

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 140
Joined: Sat Oct 08, 2005 05:16 PM
Dsay e Ssay não mostram texto comfwh 2.7
Posted: Wed Feb 22, 2006 05:03 PM

Amigos:

La clase TsButton tiene unos say transparentes, son los
STSAY...

Tengo el archivo ch y el archivo .C...
Lo acabo de probar en FWH 2.7 Febrero y Harbour y
los muestra transparentes.

No se si con muchos says funcion igual, si la necesitan les
mando lo que yo tengo...
mandenme un correo el que la quiera.
(Igualmente esta en la clase TsButton)

Saludos

Ruben Fernandez.

Rubén D. Fernández

Maldonado-Uruguay
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Como hacen esos globos
Posted: Wed Feb 22, 2006 05:25 PM
leandro wrote:Cambiando de tema, he estado leyendo los mensajes que mandaron y me causa curiosidad los globos que salen del GET, seran que no tienen un ejemplito sobre esto?

leandroalfonso111@hotmail.com


Hola Leandro... Esto és una mensajeria del Windows XP, cuando el <CAPS LOCK> está activo.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
Dsay e Ssay não mostram texto comfwh 2.7
Posted: Thu Feb 23, 2006 07:16 PM

Solucionado... :D

Obrigado a todos,

Rossine.

Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++

Continue the discussion