Membuat Injector + Mengganti Skin Baground-nya

Untuk FORM 1
pembuatanya cukup simple kok.... sediakan saja

Komponentnya :

• buat 2 form dengan nama form1 dan form2
• buat 5 command button, masing2 beri nama : command1,command2,cmdInjector,cmdExecute,cmdTerminate.
• untuk cmdInjector beri nama caption "Select DLL For Inject" tanpa tanda kutip
• untuk cmdExecute beri nama caption "Resume".
• untuk cmdTerminate beri nama caption "Terminate"
• buat timer pada form, masing2 beri nama : timer1 dan timer2

 Dowload SC


Untuk FORM 2
beri komponent-komponent-nya

• - 3 Command Button
• [*] Command1 beri Name : cmdsave lalu beri Caption : Save
• [*] Command2 beri Name : cmdimg lalu beri Caption : Browse
• [*] Command3 beri Name : cmdClose lalu beri Caption : Close
• - 1 Textbox
• - 1 Commond DIalog

lalu masukan source pada form2

Code :::

'tutorial injector with
'change menu skin'By Hades The God Of Underworld
'Dedicated to Blazetorm & N3'Hades Always ganteng

Private Sub cmdclose_Click()
On Error GoTo fileerror
Input #1, imag
Close #1
FileName = GetSetting(App.Title, "setting", "imag")
Form1.Picture = LoadPicture(imag)
form2.Text1.Text = imag
fileerror:
Me.Hide
End Sub

Private Sub cmdimg_Click()
On Error GoTo Cancel
CommonDialog1.ShowOpen
Text1.Text = CommonDialog1.FileName
imag = Text1.Text
Form1.Picture = LoadPicture(imag)
Cancel:
End Sub

Private Sub cmdsave_Click()
Print #1, Text1.Text
Close #1
End Sub

'Created by Hades@Blazetorm.Net
'Special Thx to
'All People who make me crazzy !