FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexActive topicsAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 12:42 PM

Buenas...

Hola Foro.

Estoy usando la Classe SSAY.PRG y SSAY.CH, y en Windows 98, está perfecto.

Tengo cincuenta Y uno(51) SAYS en la DIALOG, pero cuando intento COLORIR TODOS, TRABA MI DIALOG en WINDOWS XP.

FiveWin 2.7 For [x]Harbour 0.99.60... Ke devo hacer??

Gracias, y un gran saludos a todos.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 03:27 PM
Olá Antonio,

A classe ssay não está funcionando corretamente com fwh 2.7 fevereiro quando está em uma DIALOG. Em uma WINDOW funciona perfeitamente.

João a minha classe ssay é mais atual que aquela do outro tópico. A minha tem a variável LIGHT a mais.

Para descarregá-la mirem aqui: http://geocities.yahoo.com.br/qiinformatica2000/ssay.zip

Vejam no programa TESTSSAY.PRG na linha: 126 e 127.

Quando a linha 127 está ativa: "...FONT oFont TRANSPARENT"

me sai esta tela:



e quando a linha 126 está ativa: "...FONT oFont"

me sai esta tela:



e sem falar que não está dando o efeito TRANSPARENTE.

Daria para ver este problema para nós ?

Obrigado desde já,

Rossine.
Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 03:42 PM
Rossine wrote:Olá Antonio,

A classe ssay não está funcionando corretamente com fwh 2.7 fevereiro quando está em uma DIALOG. Em uma WINDOW funciona perfeitamente.

João a minha classe ssay é mais atual que aquela do outro tópico. A minha tem a variável LIGHT a mais.

Para descarregá-la mirem aqui: http://geocities.yahoo.com.br/qiinformatica2000/ssay.zip

Vejam no programa TESTSSAY.PRG na linha: 126 e 127.

Quando a linha 127 está ativa: "...FONT oFont TRANSPARENT"

me sai esta tela:



e quando a linha 126 está ativa: "...FONT oFont"

me sai esta tela:



e sem falar que não está dando o efeito TRANSPARENTE.

Daria para ver este problema para nós ?

Obrigado desde já,

Rossine.


Olá Rossine... A minha Funciona Perfeita, exceto cuando tengo 51 SAY'S na DIALOG, esto en WINDOWS XP, Inclusive el comando LIGHT, ti basta alterar SSAY.CH.

Si quiseres envio a minha modificada para voce(usted)... Abraços. Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 03:53 PM

Rossin... Testei esta ke indicastes, y mi funciona perfecto. Abraços.
menos en XP.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 04:26 PM
Olá João,

Eu estou testando este programa com XP. Em relação ao efeito transparente, é só alterar a classe CONTROL.PRG no método INITIATE:

Code: Select all Collapse
METHOD Initiate( hDlg ) CLASS TControl

   DEFAULT ::lActive := .t., ::lDrag := .f., ::lCaptured := .f.,;
           ::lFocused := .f., ::lCancel := .f., ::lTransparent := .f.

   if( ( ::hWnd := GetDlgItem( hDlg, ::nId ) ) != 0 )

      If( ::lActive, ::Enable(), ::Disable() )
      ::Link()

      if ::oFont != nil
         ::SetFont( ::oFont )
      else
         ::GetFont()
      endif

   else
     #define NOVALID_CONTROLID   1
     Eval( ErrorBlock(), _FWGenError( NOVALID_CONTROLID, "No: " + ;
                                      Str( ::nId, 6 ) ) )
   endif

   if ::lTransparent
*     if IsAppThemed()                     <<-- Tirei isto
         ::SetBrush( ::oWnd:oBrush ) 
      else
         ::SetBrush( TBrush():New( "NULL" ) )
*     endif                                   <<-- e Tirei isto
   endif   

return nil


mas não sei se isto é o certo. Antonio por favor confirme se isto pode ser assim :-)

Agora o único problema é em relação aos "cCaption" que ficam repetindo como na primeira imagem que postei acima.

Alguém sabe como resolver isto ???

Obrigado,

Rossine.
Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 04:43 PM
Oopss...

Isto também não funciona: :-)

Code: Select all Collapse
METHOD Initiate( hDlg ) CLASS TControl 

...

   if ::lTransparent 
*     if IsAppThemed()                     <<-- Tirei isto 
         ::SetBrush( ::oWnd:oBrush ) 
      else 
         ::SetBrush( TBrush():New( "NULL" ) ) 
*     endif                                   <<-- e Tirei isto 
   endif


Desculpem-me.
Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 05:11 PM

Transparent, tá funcionado perfeito... Tudo funciona perfeito.
Menos quando tenho mais de 40 SAY's.

veja briga no fivewin brasil.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 05:33 PM

Ô João,

Aqui está repetindo o say. Tá dificil. :(

http://geocities.yahoo.com.br/qiinforma ... /ssay1.png

Abraços,

Rossine.

Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Tue Feb 21, 2006 06:02 PM
Rossine wrote:Ô João,

Aqui está repetindo o say. Tá dificil. :-)

http://geocities.yahoo.com.br/qiinforma ... /ssay1.png

Abraços,

Rossine.


Tem alguma coisa errada com o seu fivewin ou [x]Harbour. Perguntei ao Cristiano e Paulo Araujo se eles estavam com Problemas com o Release de Fevereiro de 2006, e disseram-me que tudo está a contento.

Tente gerar a FIVEHX.LIB com o [x]Harbour 0.99.60 usando o HARB2LIB.EXE y Teste de Novo... Comigo, somente trava a DIALOG no XP, se tiver mais de 40 SAY's... Estranho.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Wed Feb 22, 2006 11:58 AM

Antonio, Help-me. Gracias.

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Wed Feb 22, 2006 12:13 PM

Olá Antonio,

Você poderia nos ajudar a resolver estes problemas ? Infelizmente eu não estou conseguindo resolvê-los.

Obrigado desde já,

Rossine.

Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
karinha
Posts: 8523
Joined: Tue Dec 20, 2005 07:36 PM
Re: SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Thu Feb 23, 2006 08:29 PM
karinha wrote:Buenas...

Hola Foro.

Estoy usando la Classe SSAY.PRG y SSAY.CH, y en Windows 98, está perfecto.

Tengo cincuenta Y uno(51) SAYS en la DIALOG, pero cuando intento COLORIR TODOS, TRABA MI DIALOG en WINDOWS XP.

FiveWin 2.7 For [x]Harbour 0.99.60... Ke devo hacer??

Gracias, y un gran saludos a todos.


Necesito help... Por favor.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Thu Feb 23, 2006 08:36 PM

Rossine,

Hemos modificado las librerias FWH y ya está solucionado. Envíanos un email para que te las enviemos.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Thu Feb 23, 2006 09:14 PM
Joao,

Aqui tienes un ejemplo con 100 SAYs normales funcionando ok:

regards, saludos

Antonio Linares
www.fivetechsoft.com
Rossine
Posts: 344
Joined: Tue Oct 11, 2005 11:33 AM
SENSITIVE SAY EN WINDOWS XP TRABA DIALOG
Posted: Thu Feb 23, 2006 09:16 PM

Mil Gracias Maestro :lol:

Rossine.

Obrigado, Regards, Saludos



Rossine.



Harbour and Harbour++
Static archive · New replies & topics via GitHub Discussions