Cara Membuat URL,Link aktif atau Hyperlink pada Text (Label) pada Delphi

  CaraMembuat Hyperlink pada Text (Label) pada Delphi

Bagaimana cara membuat hyperlink (text yang mengandung link atau URL) pada Delphi? 
Memang pada dasarnya tidak ada komponen tersendiri pada delphi untuk membuat text berisikan link. Jadi kalau ingin membuat hyperlink pada Delphi maka harus secara manual, dari tampilannya sampai kodingnya.

Membuat Hyperlink pada Text (Label) pada Delphi

contohnya seperti ini:

1.  Oke, selanjutnya tekan F12, maka akan muncul kotak code delphi Tambahkan ShellAPI pada bagian uses, di barisan paling atas

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ShellAPI, StdCtrls;

2.  Kemudian, kita ubah warna dari Label tersebut agar menjadi berbeda daripada label/text lainnya yang tidak ber-hyperlink(jika tidak memakai warna biasanya secara default delphi akan memberi warna biru pada texs label).

3.  Lalu, langkah berikutnya adalah merubah tampilan kursor ketika berada diatas Label yang ber-hyperlink itu.Pertama, aktifkan dulu Label yang dimaksud, lalu pada properties Cursor, pilih  crHandPoint untuk value-nya.

4. dobel klik pada Label yang dimaksud, lalu ketikkan kode berikut:

ShellExecute(Handle, 'open', 'http://www.itsystemid.blogspot.com',nil,nil, SW_SHOWNORMAL);

     Sekarang anda tinggal merubah  linknya(warna merah)sesuai link yang ingin anda kaitkan dengan label tadi.
   Oh iya,ketika di klik  link diatas akan tampil pada browser default anda. Kalo penulis sih lebih memilih Mozilla firefox sebagai browser defaultnya karna lebih suport dengan berbagai bahasa pemrograman web terbaru. Maka nanti http://www.itsystemid.blogspot.com akan terbuka di Mozilla firefox dalam tab baru atau jendela baru jika browser tidak sedang work.
Hasilnya kurang lebih seperti ini :
 
    Yang terpenting adalah sobat harus mendeklarasikan ShellAPI dibagian uses.

   sobat juga bisa menggunakannya untuk text pada menu-menu (Tmenu),dan komponen lainyan yang memakai text.doli
Selesai deh tutorial kita hari ini. Semoga dapat dipahami dengan baik. jika ada pertanyaan tentang hal lain namun masih berkaitan dengan artikel, jangan sungkan-sungkan untuk bertanya ya.