Halo Sobat Toke Ketemu lg dengan Cireng saya akan Share Cara membuat Traffic UL & DL Digital dengan Delphi7.
langsung saja yg mau silakan simak :
1.Pada variabel, kita tambahkan dulu seperti ini:
Download : Integer;
Upload : Integer;
2.Kemudian, kita tambahkan pada bagian Execute:
upload:= upload+Length(AThread.NetData);
3.dan bagian OutBound:
download:= download+Length(AThread.NetData);
4.Cara masih sama seperti membuat traffic menggunakan label.Sebagaimana coding yang kita letakan pada Timer awalnya menggunakan label seperti berikut:
Label1.Caption := FormatFloat('Down: ##0.## KB/s',download/1024);
Label2.Caption := FormatFloat('Up: ##0.## KB/s',upload/1024);
download:= 0;
upload:= 0;
5.Jangan dihapus. Rubah saja menjadi seperti ini:
Label1.Caption := FormatFloat('Down: ##0.## KB/s',download/1024);
Label2.Caption := FormatFloat('Up: ##0.## KB/s',upload/1024);
download:= 0;
upload:= 0;
6.Kemudian tambahkan komponen TMS VrNum. (Komponent ada di akhir postingan ini)
7.Beri 2 buah VrNum dan tambahkan pada bagian bawah coding label tadi menjadi seperti ini:
sLabel3.Caption := FormatFloat('0',download/1024);
sLabel4.Caption := FormatFloat('0',upload/1024);
VrNum1.Value := StrToInt (sLabel1.Caption);
VrNum2.Value := StrToInt (sLabel2.Caption);
download:= 0;
upload:= 0;
8.Coba Run atau tekan F9
9.InsyaAllah tidak ada error apabila mengikuti tutorialnya dengan benar.
10.Semoga bisa membantu teman-teman yang lain.
tlong bikinin tutorial gif nya om..!
BalasHapusmonggo saosnya saja sekalian biar kg bingung http://adf.ly/fruIf tinggal di uwix uwix saja silakan
Hapusmakasih master ane coba uwik2.. :D
Hapusmumet gan..
BalasHapustutor e kurang jelas...
download saosnya monggo http://adf.ly/fruIf tinggal di uwik uwik
HapusGan Buat label nya kayak mana
BalasHapusling mati gan......mohon diperbagiki gan.
Hapuskok delphi 7 ane kgak ad menu TMS ane pke delphi 7.0 (build 4.453) kra2 ad cra lain kgak gan untuk bkin traffic UL&DL?
BalasHapusmisi om.. numpang nanya :d
BalasHapuscara mengubah ukuran TMS vrmatrix gimana ya.. :-)
punyaku width nya kok gak bisa di ubah ya :)
source code mdma punya g?
BalasHapustutornya gag jelas gan. klu bisa pkai video aja. thanks
BalasHapusLinknya suspend bos ;(( tolong di upload lagi. makasih
BalasHapus