Foros Club Delphi - un TLabel como Hipervínculo

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)

- - un TLabel como Hipervínculo (https://www.clubdelphi.com/foros/showthread.php?t=7688)

zuriel_zrf

24-02-2004 11:35:51

un TLabel como Hipervínculo

¿Como le hago para que un TLabel lo pueda usar como hipervínculo para un archivo o pagina web en la red?

Nuria

24-02-2004 11:42:53

Hola!

Con ShellExecute.

En el uses coloca ShellApi y en el onclick del TLabel por ejemplo:

Código:

  ShellExecute(Self.Handle, nil, Pchar('http:\\www.loquequieras.com'),

               '', '', SW_SHOWNORMAL);

Espero que te sirva.

Saludos!

__cadetill

24-02-2004 11:45:12

Usando ShellExecute...

Código:

procedure TForm1.Label1Click(Sender: TObject);

begin

  ShellExecute(AboutBox.Handle,

               nil,

               PChar(TLabel(Sender).Caption),

               '',

               '',

               SW_SHOWNORMAL);

end;

PD: para que luego no digan que me lo dejo... añade ShellApi en el uses

__cadetill

24-02-2004 11:46:19

Vaya, veo que Nuria últimamente se me adelanta por los pelos :D

zuriel_zrf

24-02-2004 11:49:11

gracias...............oye?

gracias por la información.

oye, ¿para cualquier sentencia de la api de windows tengo que usar la unidad ShellApi? ¿ya no es la unidad windows?

__cadetill

24-02-2004 11:54:37

Cita:

Empezado por zuriel_zrf

¿para cualquier sentencia de la api de windows tengo que usar la unidad ShellApi? ¿ya no es la unidad windows?

Tienes API's definidas en ammas units y, de echo, ShellApi utiliza la unit Windows

Cita:

unit ShellAPI;

{$WEAKPACKAGEUNIT}

interface

uses Windows;

Nuria

24-02-2004 12:18:58

Cita:

Originalmente publicado por Cadetill
Vaya, veo que Nuria últimamente se me adelanta por los pelos...

Para que veas que me estoy superando, :D :D . Pero creo que aún me queda mucho, pero que mucho para superarte. ;)

DarkByte

24-02-2004 21:20:41

Muchos paquetes de componentes traen uno que hace cosas similares al que tu quieres... aunque siempre es mejor currarse uno su programa :d ;)

pablorc

06-01-2006 21:05:57

OK esto funciono bien, pero como habria que hacer si el hipervinculo va dirigido a una carpeta que se encuentra en el disco duro y su nombre debo de obtenerlo de un TDBEdit.

dec	06-01-2006 22:11:49

Hola,

Pablo, bievenido al ClubDelphi. Ayer planteaste una cuestión en este Hilo, que es de febrero de 2004. Podrías haber iniciado un nuevo Hilo para tu pregunta, o haber encontrado alguna respuesta a la misma usando el buscador de los Foros.

En todo caso, para hacer lo que dices, no tienes sino utilizar la función que se menciona en este hilo "ShellExecute", pasándole como parámetro la ruta de la carpeta que quieras abrir, en lugar de una dirección de Internet.

Luego podrías echar un vistazo en la ayuda del SDK Win32 (la cual se incluye con Delphi) sobre la función "ShellExecute", puesto que otros parámetros que admite pudieran darte alguna que otra idea.

Otra vez bienvenido al ClubDelphi Pablo. ;)

La franja horaria es GMT +2. Ahora son las 16:49:06.