Cara Membuat Lampu kedap kedip pada inject Komputer pada Program Delphi ~ Trik Dan Tips Internet All Operator

Cara Membuat Lampu kedap kedip pada inject Komputer Pada Program Delphi

Pada kesempatan kali ini saya akan membagikan toturial cara membuat lampu (LED) kedap kedip pada inject di program delphi dengan mudah delphi

Fungsi dari lampu (LED) kedap kedip pada inject adalah :

untuk memberi respon pada code payload
untuk memberi request pada saat inject berjalan
memberi tahu kita kalau inject sudah bekerja
bisa melihat kecepatan respon dan request pada program inject
bisa melihat kecepatan upload dan Download

langsung saja pertama tama kita persiapkan bahan bahan nya terlebih dahulu ;

2 buah shape
aplikasi Delphi
Program Inject

Baca Juga : Berbagai Akun SSH

langsung saja simak toturial cara membuat lampu (LED) kedap kedip pada inject di program delphi dengan seksama dan baik baik dan benar ;

di Bawah ini merupakan penampakan penerapan dari Lampu kedap kedip pada inject di program delphi

1. buka program delphi anda ( kalau saya memakai delphi 7 enterprice

2. ambil 2 buah shape , kemudian letahkan terserah anda

3. Tambahkan secara manual tulisan di bawah ini ;

//// lampu kedap kedip
procedure ShapeUpload;
procedure ShapeDownload;
/// lampu kedap kedip

nb: tulislah kalimat kode di atas di letahkan di atas menu private

jika belum paham bisa lihat gambar di bawah ini;

4. Tambahkan secara manual tulisan di bawah ini ;

/// lampu kedap kedip

/// code untuk shape Upload

procedure TForm1.ShapeUpload;

begin

shape1.refresh;

if shape1.brush.color=clYellow //// sesuai seleramu

then begin

shape1.brush.color:=clRed; //// sesuai seleramu

end else

begin

shape1.brush.color:=clYellow; //// sesuai seleramu

end;

/// code untuk shape Download

procedure TForm1.ShapeDownload; //// sesuai seleramu

begin

shape2.refresh;

if shape2.brush.color=clPurple //// sesuai seleramu

then begin

shape2.brush.color:=clblue; //// sesuai seleramu

end else

begin

shape2.brush.color:=clPurple; //// sesuai seleramu

end;

/// lampu kedap kedip

Nb : letahkan kode di atas secara manual terserah

di bawah ini merupakan info dari code code warna dalam penulisan program delphi

clPurple menunjukkan warna unggu
clBlue menunjukkan warna biru
clYellow menunjukkan warna kuning
clRed menunjukan warna merah

kamu juga bisa mennganti warna tersebut sesuai selera kamu contoh jika anda suka warna hitam maka tulis dengan clBlack . warna hijau (clGreen) dan lain lain nya

jika belum paham bisa lihat gambar di bawah ini;

5. Kemudian juga tambahkan code di bawah ini ;

tambahkan code di bawah ini di TCP1Execute letahkan code di bawah begin

shapeUpload;

jika belum paham bisa lihat gambar di bawah ini;

tambahan code di bawah ini di TCP1OutboundData letahkan code di bawah begin

shapeDownload;

jika belum paham bisa lihat gambar di bawah ini;

6. tambahan code di bawah ini di bawah var

Download:integer;

Upload:integer;

Maka Hasilnya akan Seperti Di bawah ini mudah kan

Anda juga bisa mendownload source code pembuatan lampu (LED) kedap kedip pada inject di program delphi di bawah ini

Via :

Solidfiles | Tusfiles

Demikianlah Artikel tentang Cara Membuat Lampu kedap kedip pada inject Komputer pada Program Delphi

Sekian dulu artikel tentang Cara Membuat Lampu kedap kedip pada inject Komputer pada Program Delphi, mudah - mudahan bisa memberi manfaat untuk anda semua. jika anda masih binggung atau belum jelas tentang artikel yang saya sampaikan anda bisa berkomentar dan jika anda juga ingin requset tentang beberapa ( Akun SSH Premium,inject PC,Config Http injector,Config KPN,config Eproxy.config Open VPN dan tips dan trick ). di kolom komentar. jika artikel yang saya berikan bermanfaat dan berguna anda juga bisa share artikel saya ke teman teman anda semua ( berbagi itu indah )

About Admin

Halo Sobat Blogger, Saya Hanyalah Seorang Blogger Pemula dan Saya Berharap Anda dan Saya Bisa Berhasil dan Sukses Kedepannya. Selamat Datang Teman Teman Dan Terima Kasih Sudah Berkunjung Diblog Website kami.