Links en ventanas

General Help regarding HMG, Compilation, Linking, Samples

Moderator: Rathinagiri

Post Reply
User avatar
jreduojeda
Posts: 45
Joined: Thu Feb 19, 2009 12:41 am
DBs Used: DBF, MySql
Location: Buenos Aires - Argentina
Contact:

Links en ventanas

Post by jreduojeda »

Hola a todos...
Hay alguna forma de poner Links en ventanas???
Necesito poner una dirección de una página web y al darle click que ejecute el explorador y levante la página.
Lo mismo necesito al poner una direeción de e-mail pero que me levante el Outlook.
Desde ya muchas gracias.
Saludos, Esteban.
Ojeda, Esteban Eduardo.
ooHg - Minigui - QAC
FiveWin - PellesC - Clipper
ADS Server - MySql - DBF/CDX
FastReport
ClaudioGalera
Posts: 47
Joined: Tue Jul 14, 2009 1:14 pm
Location: Mar del Plata, Argentina

Re: Links en ventanas

Post by ClaudioGalera »

Hola Esteban, si interprete bien tu mensaje, creo que necesitas usar simplemente el control Hiperlink .
Saludos
Claudio

Google Translate

Hi Esteban , if I read your message well, I think you need to use just Hiperlink control.
Greetings
Claudio
User avatar
jreduojeda
Posts: 45
Joined: Thu Feb 19, 2009 12:41 am
DBs Used: DBF, MySql
Location: Buenos Aires - Argentina
Contact:

Re: Links en ventanas

Post by jreduojeda »

Ok.
Alguún ejemplo de como implementarlo??
Desde ya muchas gracias.
Ojeda, Esteban Eduardo.
ooHg - Minigui - QAC
FiveWin - PellesC - Clipper
ADS Server - MySql - DBF/CDX
FastReport
User avatar
luisvasquezcl
Posts: 1263
Joined: Thu Jul 31, 2008 3:23 am
Location: Chile
Contact:

Re: Links en ventanas

Post by luisvasquezcl »

Hola Esteban,
para abrir el outlook y enviar el mensaje.

oOutLook:= toleauto():new('Outlook.Application')
omail := oOutLook:createitem(0)
omail:to := 'a_quien_envio@servidor.com'
omail:Subject :='Aqui va el asunto del mail'
oMail:BodyFormat:= 2
oMail:HtmlBody := "Aqui va el texto del archivo en formato html"
omail:Send()
oOutLook:Quit()

para abrir una pagina web te aconsejo que veas en la carpeta hmg\samples\activex\demo1.prg

espero te sea de utilidad.
Post Reply