Cara Membuat Speedometer Traffic Dengan Delphi

بِسْــــــــــــــــمِ اﷲِالرَّحْمَنِ الرَّحِيم

Tutorial Cara Membuat Speedometer Traffic Dengan Delphi, Tutorial Snippet ini tidak begitu ribett dan susah, jadi simak dengan seksama langkah langkahnya, dan anda siap mempercantik tampilan project Delphi anda dengan memakai Speedometer ini,

Langsung saja biar ga kepanjangan ...

Anda membutuhkan Komponen VrAngularMeter

Komponent delphi yang dibutuhkan bisa didownload disini

1. 2 VrAngularMeter1 Timer
2. 2 Label
3. 1Timer

Letakan Code berikut pada var :

var
Download : Integer;
Upload : Integer;

Lalu Letakan Code Pemanggilan pada Tcp anda 

Tcpexecute :

upload:= upload+Length(AThread.NetData);

Tcpoutbound :

download:= download+Length(AThread.NetData);

Letakan Kode Dibawah ini pada Timer :

Label1.Caption := FormatFloat('0',download/1024);
Label2.Caption := FormatFloat('0',Upload/1024);
VrAngularMeter1.Position := StrToInt (Label1.Caption); // Down speedometer
VrAngularMeter2.Position := StrToInt (Label2.Caption); // upload speedometer
download:= 0;
Upload:= 0;

Selesai :D

Share :

Tweet

More

Related Post

• Tutorial mencari bughost Assalalamualaikkum Warohmatullahi Wabarokaatuh. Kali ini Saya akan membe
• Tutorial instal compone TMS pada delphi 7nih,, sejuai posting saya sebelumnya yang membahas componen TMS pada delphi, maka post kali ini aka
• Cara Instal Alphaskin 8 di delphi 7kebetulan cukup banyak yang tanya cara nginstal componen alphaskin atau alphacontrol, so ane buatin