Source Delphi 7 - Menampilkan Download Dan Upload Digital Di Injek Delphi Source Delphi 7 - Menampilkan Download Dan Upload Digital Di Injek Delphi

Copas Aja source yg ane kasih dibawah ini sob:

Step 1:
tambahkan variabel

    Quote:var
    Download : Integer;
    Upload : Integer;


Step 2 :

    Quote:Kemudian, tambahkan di bagian Execute:
    upload:= upload+Length(AThread.NetData);

    sama bagian OutBound:
    download:= download+Length(AThread.NetData);


Step 3 :
kemudian tambahkan komponen VrNum(VrLcd)
tambahkan 2 komponen tersebut

tambahkan code di bwah di bagian timer :

    Quote:downText.Caption := FormatFloat('0',download/1024);
    uploadText.Caption := FormatFloat('0',upload/1024);
    VrNum1.Value := StrToInt (downText.Caption);
    VrNum2.Value := StrToInt (uploadText.Caption);
    download := 0;
    upload := 0; 

Untuk berlangganan Artikel silahkan Masukkan email anda kemudian cek inbox email

Author : Unknown

Setelah anda membaca artikel tentang Source Delphi 7 - Menampilkan Download Dan Upload Digital Di Injek Delphi jika bermanfaat, silahkan tekan tombol Share. Anda juga boleh menyalin / menyebarluaskan artikel ini, namun jangan lupa untuk meletakkan link dibawah ini sebagai sumbernya : <a href="http://cyberbintauna.blogspot.com/2014/08/source-delphi-7-menampilkan-download.html" target="_blank">Source Delphi 7 - Menampilkan Download Dan Upload Digital Di Injek Delphi</a>

Baca Juga:

Judul: Source Delphi 7 - Menampilkan Download Dan Upload Digital Di Injek Delphi
Rating: 100% based on 99998 ratings. 5 user reviews.
Ditulis Oleh Unknown
klik disini untuk menambahkan komentar blogger

Terimakasih atas kunjungan Sobat pada artikel ini,dan jangan lupa untuk meninggalkan komentar sobat tentang artikel ini.