Hola a todos,

Me tome el atrevimiento de colocar la clase TGSay en este link:

http://fivewin.sytes.net/fivewin/sources/manuramos

Si esta iniciativa de mi parte afecta a alguien (y/o a algo) por favor me hacen llegar la informacion para retirarlo.

Saludos,

Giancarlo J. Sabattino S.
gsabattino @ gmail.com
Valencia, Venezuela

Manu...

Excelente Aportacione... Fantastico.

Muchas gracias por enviarme este nuevo release.

Manu hay necesidad de si usar MISFUNC.CH?

Se si, podrias enviarme por favor?

Felicitaciones e parabiéns! És mui inteligente!

Mejor que SSAY.PRG Bién mejor. Congratulations.

Regards, saludos.

Esta clase originalmente era para Clipper.

Traté de bajar el link de arriba y no anduvo.

En los foros de Brasil encontré la misma clase funcionando perfectamente en [x]Harbour, pongo a disposición el link, esperando no ofender a nadie YO NO HICE EL LINK SOLO LO DIFUNDO.

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

Si a alguien ofendo o algo no está bien, pues, a escribir a la gente de www.fivewin.com.br, no a mí.

Para que funcione yo personalmente suprimí la mención a MisFunc.ch y reemplace en todo el código de el ejemplo CLR_OBLUE por CLR_BLUE y funcionó al toque.

Pues si sirve sirve y si no me avisan y pues al cabo lo saco.

ESTA CLASE ES DE MANURAMOS.

Saludos, espero sea de ayuda.

Yo también conseguí la clase TGSAY donde falta el MISFUNC.CH. Tras investigar un poco, si no me equivoco sólo hay que añadir a la TGSAY.CH lo siguiente:

DEFINE ACCION ON CLICK

O cambiar ACCION por ON CLICK

Colegas gustaría saber si alguien ya ha utilizar la característica aquí usando esta clase, porque no me ta el logro de un error en la línea 283 de tgsay.prg:

::nAngle := Min(Max((Min(::nWidth,::nHeight))/1.5,6),25)

Agradecido a todos

Luiz Fernando