URLLink
Posted: Tue Mar 21, 2006 8:22 pm
Antonio,
Se podría integrar la clase tActivex en lugar del shellexecute a la clase URLLink?
Se podría integrar la clase tActivex en lugar del shellexecute a la clase URLLink?
www.FiveTechSoft.com
https://fivetechsupport.com/forums/
https://fivetechsupport.com/forums/viewtopic.php?f=17&t=2316
Antonio Linares wrote:William,
URLink es un control ActiveX ?
METHOD LButtonDown( nRow, nCol, nFlags ) CLASS TURLLink
LOCAL oActivex,oWnd
::nClrInit := ::nClrVisit
DEFINE WINDOW oWnd TITLE "FiveWin ActiveX Support"
oActiveX = TActiveX():New( oWnd, "Shell.Explorer" )
oWnd:oClient = oActiveX // To fill the entire window surface
oActiveX:Do( "Navigate", ::cURL )
ACTIVATE WINDOW oWnd
return nil
//----------------------------------------------------------------------------//