Modo nativo para reemplazar clase "sayref"

Posts: 1279

Joined: Mon Feb 06, 2006 04:28 PM

Modo nativo para reemplazar clase "sayref"
Posted: Wed Mar 11, 2020 06:35 PM

Hola,

Muchos de Uds. conocen seguramente la clase sayref, excelente clase (que aún funciona) que permite al hacer click sobre un say ir a una página web.

He hecho varias pruebas tratando de usar un get sin borde y darle la misma apariencia y usar el método click.... pero no he podido hacer que funcione.

Alguien ha resuelto esto?

Apreciaría mucho vuestra ayuda, ya que lo que natura non da Salamanca non presta

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"

karinha

Posts: 8523

Joined: Tue Dec 20, 2005 07:36 PM

Re: Modo nativo para reemplazar clase "sayref"
Posted: Wed Mar 11, 2020 07:11 PM

SENSISTIVE SAY és mucho mejor.

Code (fw): Select all Collapse

#Include "FiveWin.Ch"
#Include "SSay.Ch"

FUNCTION SSAY_ABOUT()

    LOCAL oDlg, iDcor, oFnt, oSay, cMail, cMail2, cPagina, oIco, cUrl

    cMail  := "kapiabafwh@gmail.com"
    cMail2 := "kapiabafwh@yahoo.com"
    cUrl   := "http://www.fivewin.com.br"

    REDEFINE SENSITIVE SAY oSay PROMPT cMail        ;
       COLOR CLR_HBLUE LIGHT                        ;
       COLOROVER CLR_HRED  UPDATE  RAISED           ;
       ON MOUSEOVER SndPlaySound( "Select.Wav" )    ;
       ACTION WinExec( "Start MailTo:" + cMail, 0 ) ;
       CENTER TRANSPARENT ID 110 OF oDlg

RETURN NIL

João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

leandro

Posts: 1818

Joined: Wed Oct 26, 2005 02:49 PM

Re: Modo nativo para reemplazar clase "sayref"
Posted: Wed Mar 11, 2020 08:24 PM

Tambien se puede hacer con ulrlink

Code (fw): Select all Collapse

@  10,365 SAYBARCODE oSay TEXT  cUrlLink TYPE "QR-CODE" SIZE 200,200 PIXEL OF oDlg UPDATE

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) ]

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Modo nativo para reemplazar clase "sayref"
Posted: Thu Mar 12, 2020 08:48 AM

Code (fw): Select all Collapse

#include "fivewin.ch"
#include "urllink.ch"


@ r, c URLLINK oUrl URL "www.google.com" SIZE w,h PIXEL OF oDlg

Please see urllink.ch for full syntax.
This is a full FWH class

Regards

G. N. Rao.

Hyderabad, India

jose_murugosa

Posts: 1279

Joined: Mon Feb 06, 2006 04:28 PM

Re: Modo nativo para reemplazar clase "sayref"
Posted: Thu Mar 12, 2020 10:18 AM

Muchas gracias,

FWH realmente es tan completo actualmente que no es necesario estar utilizando clases viejas.

MUUUUUCHAS GRACIAS POR SU BUENA DISPOSICION!!!!

Es extraordinario ser parte de este foro de soporte, gracias Karinha, Mr. Rao y Leandro.

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"

leandro

Posts: 1818

Joined: Wed Oct 26, 2005 02:49 PM

Re: Modo nativo para reemplazar clase "sayref"
Posted: Thu Mar 12, 2020 04:33 PM

Mr. Rao aprovechando la oportunidad.

Seria posible URLLINK dentro de xbrowse?

De antemano gracias

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) ]

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: Modo nativo para reemplazar clase "sayref"
Posted: Sat Mar 21, 2020 01:25 PM

leandro wrote:Mr. Rao aprovechando la oportunidad.

Seria posible URLLINK dentro de xbrowse?

De antemano gracias

viewtopic.php?f=3&t=38652

Regards

G. N. Rao.

Hyderabad, India

FiveTech Support Forums

Continue the discussion