Kamis, 12 April 2012
Membuat MP3 Player
Hehhhhmmmmmmmm membuat MP3 Player pake’ delphi itu kelihatan nya mengasyikkan juga,,,,,, hiii jadi pengen buat……..ehh ternyata nyoba ehhhh akhirnya bisa juga.Nih temen2 kalau kalian minat anda bisa baca langsung codingnya …
- Program ini cuma make 1 form aja. Klo udah buka delphi, tinggal tambahkan beberapa objek ke form1. Objek yang pertama yaitu objek MediaPlayer yang terdapat pada component System.
- Pada bagian object inspector, pilih property VisibleButton, lalu beri nilai False untuk btNext, vtPrev, btRecord, dan btEject. Jadi button yang keliatan cuma btPlay, btPause, btStop, btStep, btBack.
- Tambahkan objek OpenDialog yang ada pada component Dialogs. Lalu pada object inspector untuk OpenDialog, pilih property Filter. Pada filter editor, kita tambahkan filter untuk file mp3 agar aplikasi ini hanya dapat membuka file mp3 saja. Misal Filter Name-nya MPEG Audio Files (*.mp3), sedangkan Filter-nya isi dengan *.mp3
- Klo kmu pake delphi7, tambahkan object XPManifest yang ada pada component Win32, agar tampilan program-nya menyesuaikan dengan setting grafik window XP.
- Tambahkan object Timer yang ada pada component System. Pastikan property Enabled-nya bernilai True, dan Intervalnya bernilai 1000.
- Tambahkan 1 buah button, captionnya diisi dengan Open mp3 file…
- Tambahkan object ProgressBar yang ada pada component Win32. Nah sekarang atur tampilannya agar seperti tampak pada gambar.
- Sebelum mulai coding, tambahin dulu variabel global berikut ini:
Mp3Path: string; paused: Boolean;
- Untuk inisialisasi, double klik form1, lalu tambahkan sourcode berikut 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;
- Nah skr mulai coding. Double klik object MediaPlayer, dan tambahkan source code berikut ini 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;
- Double klik object Timer, lalu tambahkan source 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;
- Double klik button tadi, lalu tambahkan source code ini pada procedure TForm1.Button1Click(Sender: TObject);
Rabu, 28 Maret 2012
Cara Menghilangkan Nav Bar
Mungkin anda kadang melihat blog yang masih menampakkan navigasi bar.Secara default saat anda membuat blog,akan tampak navigasi bar yang terletak di bagian atas blog. Navigasi bar berguna untuk mempercepat login ke account blog anda untuk mengedit atau menambah postingan. Karena anda bisa langsung menekan tombol Sign in untuk masuk ke dashboard blog anda.
Jika anda telah menghilangkannya, maka untuk melakukan pengeditan atau menambah postingan, anda harus log in ke account blog anda pakai url:
http://www.blogger.com
Untuk menyembunyikannya, anda bisa gunakan prosedur berikut:
1. Login ke dashboard anda
2. Pilih Tata Letak => Edit Html => Centang "Expand Template Widget"
3. cari kode seperti di bawah ini
Disini saya akan menjelaskan cara membuat video player sederhana menggunakan Visual Basic 6, dan saya akan memberikan gambarannya seperti yang di bawah ini :
Untuk Kodingannya seperti yang ada di bawah ini :
Private Sub Form_Resize()
WindowsMediaPlayer1.Width = Me.ScaleWidth
WindowsMediaPlayer1.Height = Me.ScaleHeight
End Sub
Private Sub mnAbout_Click()
Me.Hide
frmAbout.Show
End Sub
Private Sub mnexit_Click()
End
End Sub
Private Sub mnopen_Click()
On Error Resume Next
CommonDialog1.ShowOpen
WindowsMediaPlayer1.URL = CommonDialog1.FileName
End Sub
Jumat, 02 Maret 2012
Cara Menambahkan Mp3 Pada Blog
Ini ditujukan bagi SobatBro yang hobi dengerin lagu
, atau yang pingin memiliki blog tentang lagu, atau siapa aja yang pingin memasang lagu kesayangannya dipasang di blog, agar pengunjung bisa dengerin lagu-lagu koleksi anda, untuk mewujudkannya bisa menggunakan cara mudah berikut ini:Cara Pertama >> Menggunakan scriptnya Google Reader MP3 Player (
Layanan ini milik Google, Sobat, so soal performa jangan tanya… udah pasti ok punya, bisa diandelin lah yang pastinya)Scriptnya:
<embed type="application/x-shockwave-flash" flashvars="audioUrl=ALAMAT_URL_FILE_MP3_Anda" src="http://www.google.com/reader/ui/3523697345-audio-player.swf" width="400" height="27" quality="best"></embed>
Cara Kedua >> Atau bisa juga menggunakan fiturnya GMail (
lagi-lagi punyanya Google, Sobat)Scriptnya:
<embed type="application/x-shockwave-flash" flashvars="audioUrl=ALAMAT_URL_FILE_MP3_Anda" src="http://mail.google.com/mail/html/audio.swf" width="400" height="27" quality="best"></embed>
Sebaiknya anda tahu:
cat 1: Gantilah tulisan ALAMAT_URL_FILE_MP3_Anda >> dengan alamat url [http://...] dimana file lagu mp3 disimpan (tapi ingat, lagunya jangan diupload di layanan simpan data gratisan seperti 4shared, ziddu, Rapidshare, dll, karena mereka tidak bisa diakses filenya secara langsung -[semacam ada iklan/timernya]-)
Cat 2: Kalau ingin dipasang di blog/web anda, copy paste aja langsung kode script diatas, dan sekali lagi jangan sampai lupa mengganti alamat url lagu mp3 anda
Oy, Sobat pasti penasaran kan seperti apa nantinya, maka silahkan mencoba..
Selasa, 21 Februari 2012
CARA MENGHAPUS VIRUS SHORTCUT
Cara Hapus Tuntas virus Copy of Shortcut + Recycler (W32/Ramnit) - Cara Menghapus Virus Shortcut Terbaru 2012 memang virus shortcut tidak menggangu sistem komputer akan tetapi sangat mengganggu kita apalagi virus ini selalu meng-Hidden file kita sehingga seolah - olah virus ini telah men-delete file kita. berikut ini adalah cara menghilangkan virus shortcut
1. Matikan system restore computer kita terlebih dahulu caranya klik kanan pada icon My Computer, properties, klik tab System Restore kemudian berikan tanda centang pada Turn Off System Restore on All Drives dan klik OK
2. Matikan proses dari file Wscript yang terletak di C:\Windows\System32, dengan cara menggunakan tools seperti CProcess, HijackThis atau dapat juga menggunakan Task Manager dari Windows
3. Setelah dimatikan proses dari Wscript tersebut, kita harus men-delete atau me-rename dari file tersebut agar tidak digunakan untuk sementara oleh virus tersebut
Sebagai catatan, kalau kita me-rename dari file Wscript.exe tersebut dengan otomatis, maka akan dicopykan lagi di folder tersebut. Oleh sebab itu, kita harus mencari di mana file Wscript.exe yang lainnya, biasanya ada di C:\Windows\$NtServicePackUninstall$, C:\Windows\ServicePackFiles\i386.
Tidak seperti virus-virus VBS lainnya, kita bisa mengganti Open With dari file VBS menjadi Notepad, virus ini berextensi MDB yang berarti adalah file Microsoft Access. Jadi Wscript akan menjalankan file DATABASE.MDB seolah-olah dia adalah file VBS
4. Delete file induknya yang ada di C:\Documents and Settings\\My Documents\database.mdb, agar setiap kali komputer dijalankan tidak akan me-load file tersebut. Dan jangan lupa kita buka juga MSCONFIG, disable perintah yang menjalankannya.
5. Sekarang kita akan men-delete file-file Autorun.INF. Microsoft.INF dan Thumb.db. Caranya, klik tombol START, ketik CMD, pindah ke drive yang akan dibersihkan, misalnya drive C:\, maka yang harus kita lakukan adalah:
Ketik C:\del Microsoft.inf /s, perintah ini akan men-delete semua file microsoft.inf di seluruh folder di drive C:. Sementara kalau mau pindah drive tinggal diganti nama drivenya saja contoh: D:\del Microsoft.inf /s.
Untuk file autorun.inf, ketik C:\del autorun.inf /s /ah /f, perintah akan men-delete file autorun.inf (syntax /ah /f) digunakan karena file tersebut memakai attrib RSHA, begitu juga untuk file Thumb.db lakukan juga hal yang sama
6. Untuk men-delete file-file selain 4 file terdahulu, kita harus mencarinya dengan cara search file dengan ekstensi .lnk ukurannya 1 kb. Pada 'More advanced options' pastikan option 'Search system folders' dan 'Search hidden files and folders' keduanya telah dicentang.
"Harap berhati-hati, tidak semua file shortcut / file LNK yang berukuran 1 kb adalah virus, kita dapat membedakannya dari ikon, size dan tipenya. Untuk shortcut yang diciptakan virus ikonnya selalu menggunakan icon 'folder', berukuran 1 kb dan bertipe 'shortcut'. Sedangkan folder yang benar harusnya tidak memiliki 'size' dan tipenya adalah 'File Folder'. "
7. Fix registry yang sudah diubah oleh virus. Untuk mempercepat proses perbaikan registry salin script dibawah ini pada program 'notepad' kemudian simpan dengan nama 'Repair.inf'. Jalankan file tersebut dengan cara:
Klik kanan repair.inf
Klik Install
[Version]
Signature="$Chicago$"
Provider=Vaksincom Oyee
[DefaultInstall]
AddReg=UnhookRegKey
DelReg=del
[UnhookRegKey]
HKLM, Software\CLASSES\batfile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\comfile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\exefile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\piffile\shell\open\command,,,"""%1"" %*"
HKLM, Software\CLASSES\regfile\shell\open\command,,,"regedit.exe "%1""
HKLM, Software\CLASSES\scrfile\shell\open\command,,,"""%1"" %*"
HKLM, SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon, Shell,0, "Explorer.exe"
HKLM, SYSTEM\ControlSet001\Control\SafeBoot, AlternateShell,0, "cmd.exe"
HKLM, SYSTEM\ControlSet002\Control\SafeBoot, AlternateShell,0, "cmd.exe"
[del]
HKLM,SOFTWARE\Microsoft\Windows\CurrentVersion\Run, Winupdate
HKCU,SOFTWARE\Microsoft\Windows\CurrentVersion\Run, explorer
Vriizee Reviewed by Pembasmi Virus on Jan 30. Cara Menghilangkan Virus Shortcut Cara Menghilangkan Virus Shortcut - memang virus shortcut tidak menggangu sistem komputer akan tetapi sangat mengganggu kita apalagi virus ini selalu meng-Hidden file kita sehingga seolah - olah virus ini telah men-delete file kita. Rating: 4.5
mudah - mudahan Cara Menghilangkan Virus Shortcut
ini bermanfaat ya...
Rabu, 22 Februari 2012
Cara Mengganti Kursor pada Blog
Ikhwan-ikhwan bosan dengan tampilan kursor yang biasa-biasa saja? maka kali ini ikhwan-ikhwan mempelajari bagaimana mengganti atau merubah kursor ikhwan-ikhwan misalnya menjadi kursor yang bergerak atau animasi. untuk membuat kursor animasi sesuai keinginan ikhwan-ikhwan bisa dilakukan dengan menggunakan software-software pembuat animasi. Namun jika ikhwan-ikhwan tidak menguasai software tersebut, maka ada cara yang lebih mudah dilakukan. diinternet banyak sekali situs-situs yang menawarkan kursor animasi. ikhwan-ikhwan bisa mendapatkan kursor yang ikhwan-ikhwan inginkan didalam situs seperti itu.Berikut langkah-langkah yang harus ikhwan-ikhwan lakukan:
Mencari kursor gratis terlebih dahulu
Berikut ini langkah-langkah pencarian situs penyediaan kursor gratis, lalu mendapatkan kursor yang ikhwan-ikhwan inginkan dan membuanya siap ditempatkan dalam blogspot anda:
* Untuk mencari situs penyedia kursor gratis, gunakan Search engine dengan penulisan kata kunci pencarian misalnya "free animated cursor" atau ikhwan-ikhwan bisa kunjungi situs http://www.cursorpedia.com/ untuk mendapatkannya
* Bila ikhwan-ikhwan telah menemukan situs yang tepat dan model kursor animasi yang ikhwan-ikhwan sukai, maka pastikan bahwa ikhwan-ikhwan memperoleh URL dari animasi tersebut.
* Contoh URL animasi yang didapatkan dari situs www.cursorpedia.com adalah seperti ini: http://www.cursorpedia.com/ani/heart_heart_32.ani
* Kebanyakan kursor telah memiliki kode lengkap yang khusus diperuntukkan bagi situs tertentu, misalnya MySpace. bila ikhwan-ikhwan menemukan yang seperti ini, maka ambil saja URL kursornya.
* Pastikan alamat URL ini mempunyai ekstensi .ani (untuk kursor animasi) atau .cur (untuk kursor biasa) apabila anda hanya mendapatkan file berformat.ani atau .cur (bukan sebuah URL), maka ikhwan-ikhwan harus meng-upload kedalam webhosting khusus untuk image seperti www.photobucket.com
* Selanjutnya sisipkan URL kursor animasi ikhwan-ikhwan ke dalam script berikut ini
Cursor: url ("URL KURSOR");
Gantilah teks "URL KURSOR" dengan URL kursor yang ikhwan-ikhwan peroleh. Contohnya seperti ini:
cursor:url("http://www.cursorpedia.com/ani/heart_heart_32.ani");
* Dengan script diatas maka kursor animasi ikhwan-ikhwan telah siap diaplikasikan kedalam halaman Blogspot ikhwan-ikhwan.
Mengaplikasikan Kursor dalam Blog ikhwan-ikhwan
Setelah ikhwan-ikhwan mempunyai script kursor seperti bahasan diatas, maka selanjutnya akan dijelaskan bagaimana cara mengaplikasikan kursor ke dalam halaman blogspot milik ikhwan-ikhwan.
Berikut ini caranya:
* Login terlebih dahulu kedalam akun Blogspot ikhwan-ikhwan
* Setelah itu klik menu Layout pada halaman dashboard
* Selanjutnya klik menu EDIT HTML
* Kemudian Cari kode body { (agar lebih mudah mencarinya tekan Ctrl+F pada keyboard ikhwan-ikhwan)
* Setelah ketemu masukkan script kursor yang anda miliki tadi seperti ini
body {
padding: 0;
margin: 0;)
font-size: small;
color: $textcolor;
background: #fff;
text-align: center;
cursor:url("http://www.cursorpedia.com/ani/heart_heart_32.ani");
}
* Setelah itu klik tombol Save Template dan lihat hasilnya
Selamat mencoba.......
