Pages

▼

Cek Koneksi Internet dengan Dephi

Untuk Mengecek apakah PC kita terhubung  dengan internet atau tidak, coba gunakan coding Berikut.

if (GetSystemMetrics(SM_NETWORK) AND $01 = $01) then
    Label1.Caption:='Connected'
else
    Label1.Caption:='Not Connected'

Terika Kasih !!

1 comment:

  1. vandasoftFebruary 16, 2014 at 8:58 AM

    if (GetSystemMetrics(SM_NETWORK) AND $01 = $01) then
    Label1.Caption:='Connected'
    else
    Label1.Caption:='Not Connected'

    ReplyDelete

Jangan Lupa Memberikan Komentar, Namun Tolong Agar Menggunakan Bahasa Yang BAIK dan SOPAN Terima Kasih...