17B986

Showing posts with label My Pheaker. Show all posts
Showing posts with label My Pheaker. Show all posts

Wednesday, December 9, 2015

Membuat Lampu Kedap Kedip di Dalam Inject

Membuat Lampu Kedap Kedip di Dalam Inject


Membuat Lampu Kedap Kedip di Dalam
 
Inject 

selamat datang di blog ssh injector kali ini saya akan berbagi tutorial cara membuat lampu kedap kedip di dalam inject kegunaan lampu kedap kedip dalam inject yaitu supaya kita dapat mengetahui kecepat akses internet yang saya pakai untuk info selanjutnya saya juga membagikan tutorial yang lainya dan saya juga menyediakan inject all operator dijamin 100% work langsung saja kita mulai tutorialnya.



Pertama buka aplikasi delphi terlebih dahulu selanjutnya sobat kumpulkan komponennya

2 Buah Timer
-Aplikasi delphi

Langsung Saja Kita mulai Tutorialnya



Wednesday, December 2, 2015

Cara Membuat Inject All Operator Supaya Bisa 100%Work

This summary is not available. Please click here to view the post.

Tuesday, December 1, 2015

Shared Cara Membuat Tutorial di dalam Inject terbaru





Shared Cara Membuat Tutorial di dalam Inject terbaru



-pertama langsung saja kita mulai tutorialnya 
-alat yang di butukan yaitu aplikasi delphi kalau belum puya silakan download saja
-buka aplikasi delphi dulu
-sobat pilih menu standart
-terus pilih gambar pada menu standart seperti gambar di bawah ini!






-selanjutnya klik pada icon tadi yang ada di menu standart 2 kali klik
-isi pada caption contoh tutorial
-lihat saja pada gambar di bawah ini!





-kemudian sobat klik 2 kali pada tulisan tutorial di atas isi kode ini di bawah begin!

ShowMessage( 'ganti tutorial'+chr(10)+
'ganti tutorial'+chr(10)+
'ganti tutorial'+chr(10)+
'ganti tutorial'+chr(10)+
'ganti tutorial'+chr(10)+
'ganti tutorial');


-kalau anda belum paham lihat gambar di bawah ini!








-yaitu saja artikel yang saya bagikan semoga bermanfaat bagi anda sebelum anda keluar dari blog saya mohon komentar dengan simbol kehormatan sekian terimakasih.












Sunday, November 29, 2015

Cara Membuat Tulisan Berjalan keren dengan Mengunakan Komponen TMS




Cara Membuat Tulisan Berjalan keren dengan Mengunakan Komponen TMS



-pertama sobat harus perlu komponen TMS untuk komponen silakan COMOT DI SINI
-silakan buka aplikasi delphi terlebi dahulu
-kemudian istal komponen TMS yang sudah di download tadi
-sebelum menginstal extak dulu komponen TMS dulu
-seperti gambar di bawah ini?



-selanjutya sobat copy semua data yang ada di progam files


-selanjutnya jalankan aplkasi delpi suda masuk atau belum komponen TMS yang sudah di istal tadi contoh komponen yang sudah berhasil di instal


-selanjutnya klik komponen untuk membuat tulisan berjalan  seperti gambar di bawah ini
-isi tulisan pada caption dengan selera anda inginkan


-selanjutnya ganti pada AutoScrool (true) menjadi (false) supaya tulisan bisa berjalan
seperti gambar di bawah ini


-sekian terimahkasi semoga artikel yang saya bagikan bermanfaat bagi anda by:sshistimewa.blogspot.com-















Saturday, November 28, 2015

Cara Menampikan IP adress pada inject


Cara Menampikan IP adress pada inject







1.pertama  maukan kode ini dibawah {$R *.dfm}


function GetIPFromHost (var HostName, IPaddr, WSAErr: string): Boolean;
type
Name = array[0..100] of Char;
PName = ^Name;
var
HEnt: pHostEnt;
HName: PName;
WSAData: TWSAData;
i: Integer;
begin
Result := False;
if WSAStartup($0101, WSAData) <> 0 then begin
WSAErr := 'Winsock is not responding."';
Exit;
end;
IPaddr := '';
New(HName);
if GetHostName(HName^, SizeOf(Name)) = 0 then
begin
HostName := StrPas(HName^);
HEnt := GetHostByName(HName^);
for i := 0 to HEnt^.h_length - 1 do
IPaddr :=
Concat(IPaddr,
IntToStr(Ord(HEnt^.h_addr_list^[i])) + '.');
SetLength(IPaddr, Length(IPaddr) - 1);
Result := True;
end
else begin
case WSAGetLastError of
WSANOTINITIALISED:WSAErr:='WSANotInitialised';
WSAENETDOWN      :WSAErr:='WSAENetDown';
WSAEINPROGRESS   :WSAErr:='WSAEInProgress';
end;
end;
Dispose(HName);
WSACleanup;
end;


2.klik 2 kali pada timer masuka kode ini

procedure TForm1.Timer1Timer(Sender: TObject)
var Host, IP, Err: string;
begin
if GetIPFromHost(Host, IP, Err) then begin
statusbar1.Panels[0].Text:=Host  ;
statusbar1.Panels[1].Text:=IP;


(itu saja infonya semoga bermanfaat)




Cara Mengetahui Bug Orang yang masi Aktif





CARA MENGETAHUI BUG ORANG MASI AKTIF









1.pertama anda harus membutukan aplikasi DEDE AMBIL DISINI

2.buka aplikasi dede seperti gambar di bawah ini?


3.selanjunya masukan inject ke dede yang sudah di exrak tadi  contoh gambar ini?


4.klik gambar file - cari inject yang sudah di extrak tadi- klik open- klik process

5.selanjutnya klik  produsers akn mucul pilihan silakan pilih TCP1 exute seperti gambar di bawah ini 





(yaitu saja info saya semoga bermanfaat bagi anda terimakasi)