Monday, March 14, 2011

Mengembalikan File yang Disembunyikan Virus Shortcut

Hai teman-teman semuanya apa kabar? Udah lama ga ngeblog neh ampir setahun lebih kira-kira hihihi... Kali ini dalam postingan saya ingin sedikit berbagi info yang mungkin bermanfaat buat temen-temen semua. Langsung saja ke topik permasalahannya ya...
Terkadang Virus shortcut yang sering menyerang flashdisk membuat kita kebingungan karena folder-folder yang ada berubah menjadi shortcut semua.. huhu.. hihi :) Tapi jangan khawatir kita dapat mengembalikan folder yang disembunyikan hanya dalam 3 detik saja. Mau tau caranya ikuti petunjuk di bawah ya

1. Buka notepad

2. Copy tulisan dibawah ini
attrib -s -h *.doc /s
attrib -s -h /s /d


3. Lalu paste tulisannya di notepad


4. Simpan file nya di tempat yang mengandung virus shortcut dengan ekstensi .bat (nama file terserah... kalo disini saya menyimpan file dengan nama kembaliin.bat) :))


contoh saja....


5.Setelah file ekstensi bat disimpan ditempatnya.. Klik 2x pada file kembaliin.bat tersebut

6. 1 2 3.. folder yang disembunyikan muncul kembali

7. Hapus deh yang bentuknya shortcut


Saya menulis postingan ini sekedar berbagi pengalaman pribadi saja.. hihi...
Sekian dan terima kasih..
Readmore>>

Saturday, November 28, 2009

Membuat MP3 Player Menggunakan Delphi

Sore ini saya ingin share mengenai pembuatan MP3 Player menggunakan Borland Delphi. Disini saya menggunakan Borland Delphi 7. Seperti apa MP3 Playernya. Seperti ini kurang lebih


Sederhana namun tidak memakan memory yang cukup besar, bekerja sesuai fungsinya, meski sederhana namun dapat bekerja dengan baik layaknya pemutar MP3 lainnya. Mau belajar cara membuatnya. Sangat mudah yang pertama kita siapkan 1 buah Form. Kemudian pada componen System ada media player seperti ini gambarnya
Media player dipilih kemudian tempatkan di Form. Pada componen Dialogs pilih OpenDialog . Pada componen Win32 pilih objek XPMainFest seperti in i . Kemudian di componen System pilih Timer . Di standar pilih Button dan tempatkan di Form. Dan terakhir pilih componen System, kemudian tempatkan Progress Bar di form . Tempatkan semua componen dalam 1 form, kurang lebih tampilannya nanti akan seperti ini.


Sekarang di form pilih objek Media Player kemudian atur Property nya. Di property Visible Button ganti menjadi False pada btNext, btPrev, btEject, btRecord. Yang lainnya True.
Di objek Open Dialog pada property Filter dipilih, kemudian tuliskan *.mp3 fungsinya yaitu kita akan membuka file music yang hanya berekstensi mp3 saja. Filter name tuliskan MPEG Audio Files.


Caption di button tuliskan music mp3 atau terserah sesuai keinginan Anda.
Tambahkan variable global seperti ini di bawah var

Mp3Path: string;
paused: Boolean;

jadi nanti hasilnya kan seperti ini
var
Form1: TForm1; //disini saya menggunakan nama Form1
Mp3Path: string;
paused: Boolean;

Sekarang kembali ke Form kemudian double click Form nya, lalu kita masukkan kode ini pada procedure TForm1.FormCreate(Sender: TObject);

paused:=false;
MediaPlayer1.Enabled:=False;
Form1.Height:=115;
Form1.Width:=435;
Form1.Top:=(Screen.Height-Form1.Height)div 2;
Form1.Left:=(Screen.Width-Form1.Width)div 2;

Kembali ke Form, lalu sekarang double click pada Media Player, masukkan code pada procedure TForm1.MediaPlayer1Click(Sender: TObject; Button: TMPBtnType;
var DoDefault: Boolean);

if Button = btStop then
begin
MediaPlayer1.Position:=0;
ProgressBar1.Position:=0;
end
else if Button = btStep then
begin
if ((MediaPlayer1.Position+5000)<=MediaPlayer1.Length) then
MediaPlayer1.Position:=MediaPlayer1.Position+5000
else
begin
MediaPlayer1.Position:=0;
ProgressBar1.Position:=0;
end;
MediaPlayer1.Play;
end
else if Button = btBack then
begin
if ((MediaPlayer1.Position-5000)>0) then
MediaPlayer1.Position:=MediaPlayer1.Position-5000
else
MediaPlayer1.Position:=0;
MediaPlayer1.Play;
end;

Kembali ke Form lalu double click pada objek Timer, tambahkan code ini pada procedure TForm1.Timer1Timer(Sender: TObject);

if MediaPlayer1.Enabled then
begin
ProgressBar1.Position:=MediaPlayer1.Position;
if ProgressBar1.Position=MediaPlayer1.Length then
begin
MediaPlayer1.Stop;
ProgressBar1.Position:=0;
MediaPlayer1.Close;
MediaPlayer1.Enabled:=true;
MediaPlayer1.FileName:=Mp3Path;
MediaPlayer1.Open;
MediaPlayer1.Position:=0;
ProgressBar1.Max:=MediaPlayer1.Length;
ProgressBar1.Min:=0;
end;
end;

Sekarang pada Button klik 2x kemudian tambahkan source kode ini pada procedure TForm1.Button1Click(Sender: TObject);

if OpenDialog1.Execute then
begin
Mp3Path:=OpenDialog1.FileName;
with MediaPlayer1 do
begin
Enabled:=true;
FileName:=Mp3Path;
Open;
Position:=0;
Play;
end;
ProgressBar1.Max:=MediaPlayer1.Length;
ProgressBar1.Min:=0;
end;

Selesai dan jalankan dengan menekan F9. Kini Anda punya pemutar MP3 buatan sendiri ^_^
Readmore>>

Thursday, November 26, 2009

Form Delphi

Setelah lama vacum wkwkwkwk (apa seeh...) saya akan membahas mengenai Form pada Delphi. Yang pertama harus kita lakukan yaitu membuka program Delphi seperti yang telah saya bahas pada postingan saya sebelumnya mengenai Pengenalan Delphi
Kita buka program Delphi tersebut, kemudian kita akan menemui tampilan seperti ini


Ini yang dinamakan Form


Fungsinya untuk membuat suatu program menjadi user friendly dengan tampilan interface yang mempermudah interaksi antara manusia dan komputer.
Apa yang bisa kita lakukan dengan Form pada Delphi tersebut. Kita bisa membuat suatu tampilan yang menarik dalam membuat suatu program. Berikut componen dari Delphi :


Ada componen Standar, Additional, WIN32, System, Data Access, etc. Nanti akan saya bahas satu persatu berikut fungsinya. Dari mulai componen Standar dulu ya. Cara menggunakan componen tersebut adalah dengan mengclick 2X pada componen yang diinginkan. Atau di click, kemudian di drag ke jendela Form. Di componen standar ada Pointer yang berguna untuk memindahkan componen-componen yang sudah dibuat. Frame tidak dapat langsung dijalankan pada form, harus menggunakan File - New- Frame. Main menu untuk membuat menu di atas program kita, tujuannya untuk mempermudah dalam navigasi. PopUpMenu digunakan apabila kita mengclick kanan pada sutu program kan nanti akan muncul menu, itu dibuat menggunakan PopUpMenu. Label digunakan untuk menulis teks. Edit berguna untuk input data. Memo untuk menginput data dan catatan dalam jumlah karakter yang banyak. Button digunakan untuk memproses suatu progam sesuai perintah yang diberikan. Checkbox digunakan untuk memberi pilihan yang lebih dari satu pilihan. Radio Button digunakan untuk memilih salah satu pilihan saja.
Cara untuk menggunakan componen-componen tersebut yaitu dengan mengclick 2X pada salah satu componen yang diinginkan. Misalnya kita ingin menampilkan tulisan "Selamat Datang", caranya yaitu di componen Standar ada label yang gambarnya seperti ini . Klik 2 kali, lalu pada jendela Form akan muncul seperti ini



disitu terlihat ada Label1. Untuk mengatur Label tersebut kita bisa mengubah nya di Jendela Object Inspector Properties


Properties Caption gunanya untuk menampilkan tulisan yang diinginkan. Misalnya kita tuliskan di properties Caption ganti tulisan Label1 menjadi Selamat Datang. Kemudian di properties ada Font , font digunakan untuk mengatur fomat tulisan yang diinginkan. Klik di font bagian sebelah kanan disitu kita bisa mengatur formatnya.



Klik OK dan pada Form kita akan melihat perubahan pada label tadi.

Readmore>>

Friday, June 19, 2009

Award dari Blogger

Teng teng jam setengah sembilan pagi hari ini dapet Award lagi dari HACKER dan DenMas sekaligus dalam sehari WEW hohhoho, eh dapet lagi dari Bunga Sempurna makasih ya ini awardnya... Sukses selalu,,,,,,,,,,,,,,,, Hanya untuk mempererat silaturahmi diantara blogger aja ok,,,,,,,,,,,

Nama: aily imut

==URL/Web : www.ailyaily.co.cc==

==email : ailyimut@gmail.com==

==Hobby: membaca, melukis, browsing==

==Cita -cita: pelukis==

==mulai nge-bloggwalking: 09 april 2009==

==Kota ku: Bandung==

Readmore>>

Thursday, June 18, 2009

Pengenalan Delphi

Pasti sebagian besar orang sudah tau apa itu Deplhi? Untuk yang belum tau saya bahas disini semampu saya saja ya..... Apa Anda tau kalau belajar program itu sangat mengasyikan? Kita bisa mengasah logika kita disini. Delphi merupakan salah satu software pembuat program basic. Seperti apa itu Delphi? Untuk tampilan icon luarnya seperti ini.

Kali ini saya akan memperkenalkan seperti apa itu delphi bagian-bagiannya dan selanjutnya saya akan membuat sebuah contoh program dasar menggunakan Delphi.
Cara masuk ke program Delphi sangat mudah pertama apabila kita sudah memiliki software nya kita langsung double klik saja iconnya, kemudian Delphi akan memunculkan gambar seperti ini

Gambar diatas saat loading membuka program Delphi. Disini saya memakai contoh Borland Delphi 7.
Delphi sudah terbuka tampilannya seperti ini

Ini adalah baris Menu

Ini adalah Toolbar

Ini adalah Componen Palette

Ini adalah Jendela Object Tree View

Ini adalah Jendela Object inspector

Ini adalah Jendela Form

Untuk mulai membuat program dasar kita bisa langsung ke Menu File - New - Other


Klik sekali akan memunculkan jendela New Item seperti ini

Kita pilih yang Console Application, double klik atau pilih lalu tekan OK

Akan memunculkan Project untuk menuliskan program seperti ini. Disini tempat kita menuliskan perintah-perintah yang selanjutnya akan dijalankaan oleh komputer atau kita sebut sebagai program. Di dalamnya terdapat program, uses, begin, dan end. Untuk pembuatan program yang lebih rinci akan ada tambahan lain seperti var, type, procedure, function. Namun sebagai dasar kita memahami cara kerja suatu program dulu.

Untuk di sebelah tulisan program itu adalah nama program yang akan kita buat misalnya sebagai contoh kita tulis coba, jadi namanya adalah program coba.

Suatu program itu terdiri dari Input, Proses, dan Output. Programer yang baik akan menuliskan programnya berdasarkan Input, Proses, dan output secara berurutan tidak acak-acakan.
Di dalam program Delphi ada perintah-perintah dasar seperti write, readln, writeln, juga perintah-perintah lain yang akan saya bahas dalam postingan selanjutnya.
write adalah perintah untuk menuliskan input
readln adalah perintah untuk membaca input
writeln adalah perintah untuk mencetak hasil atau disebut juga keluaran
Contoh program sangat sederhana seperti ini

setiap perintah diakhiri dengan tanda ; atau (titik koma*)
cara menjalankan program dengan menekan F9 pada keyboard, lalu akan tampil seperti ini apabila tidak ada kesalahan dalam menuliskan program

terlihat ada perintah untuk memasukkan nama disitu. Inilah kiranya pengenalan dasar mengenai Delphi. Untuk pembahasan mengenai Delphi selanjutnya akan dibahas dalam postingan saya yang akan datang hohohohoho............



Readmore>>

Wednesday, June 17, 2009

Tulisan Terbalik di Facebook

Hohohoho mau bikin tulisan terbalik di Facebook misalnya di status gitu. Ayo sapa yang suka gonta ganti status hohohoho............... Caranya gampang banget tau.......... Kalo yang udaaaaah tau ya gapapa ini kalo yang mau tau aja gini caranya.............
1. Kamu masuk ke situs ini ya disini
2. Akan tampil sebuah situs seperti ini


3. Arti dari tulisan terbalik disebut juga Upside Down Writing

4. Masukkan tulisan yang kamu inginkan disini

5. Kemudian untuk hasil ada disini

6. Copy paste saja ke status FB mu atau Wall temanmu

7. Seep dah ya berpusing pusing ria..... hohohho udah akh,,,,,,,,,,,,,,

Readmore>>

Tuesday, June 16, 2009

YM Status Indicator di Facebook

Mau pasang status YM di Profile HTML di Facebook? Yang pertama harus dilakukan adalah kita pasang dulu Profile HTML dengan meng-Add disini . Kemudian kita View application nya gambar nya seperti ini


Pilih Go To Application ini

Lalu akan muncul tampilan seperti ini

Kita pilih yang Profile Box

untuk kode kode YM Status bisa kita dapat disini lucu-lucu loch kodenya hihihi buka aja situsnya... heuhue..... Posting Ini pun menanggapi pertanyaan teman saya yang memakai kode HTML untuk YM katanya gada perubahan di Facebook saat online tetap saja statusnya offline di Facebook.
karena ini digunakan untuk menyimpan kode-kode HTML kita bisa menyimpan kode-kode HTML lain seperti Friendster, atau gambar-gambar lain. Atur-atu sendiri saja... hihiihi.........
Kemudian klik Submit dan silahkan lihat di Profile Facebook Anda. Hasilnya seperti ini hohoho narsis mode ON


Readmore>>