Berkenalan Dengan Gammu

Gammu adalah sebuah projek open source berbasis command line yang di kembangkan untuk mengontrol ponsel atau modem dengan PC. sederhananya, dengan bantuan gammu kita dapat mengirim dan menerima pesan melalui komputer atau PC kita. Gammu banyak di gunakan untuk membuat Aplikasi SMS Gateway.

Gammu Berfungsi untuk berkomunikasi dengan Modem atau Ponsel yang terhubung dengan Komputer. Oleh karenanya gammu akan secara otomatis mengecek sms yang di terima dan memindahkannya ke database begitupun jika ada perintah untuk mengirim sms, program memindahkan ke database kemudian gammu yang meneruskan ke nomor tujuan. Kira-kira seperti itulah sedikit gambaran tentang gammu. Mengenai Cara Kerja Gammu ini, Untuk Lebih Jelasnya Mungkin anda bisa melihat gambar berikut

Pada saat postingan ini di buat, Gammu sudah support dengan ratusan merek Ponsel dan Modem. anda dapat mengecek apakah ponsel atau modem anda support pada situs resminya disini

Minimaze to Systray dengan Code Delphi

Minimaze to Systray atau sering juga di sebut Tray Icon. Sobat Delphi Tutor Tahu kan apa itu ?

Masalahnya saya sendiri bingung mau menjelaskan bagaimana. :)

agar tidak sama-sama bingung contoh screen shootnya Seperti di bawah ini 

sudah tahu kan ? nah, sekarang mari kita belajar bagaimana membuat aplikasi agar pada saat di minimaze jadi kayak gambar diatas (mengecil ke systray) caranya mudah kok. ikuti saja step-step berikut :

1. Buka Delphi Anda dan Desain Sesuka Hati

2. Tambahkan 1 Buah Popup Menu dan buat 2 menu di dalam popup menu anda (About & Close) Seperti gambar di bawah ini

3. Tambahkan sebuah Button

4. Tambahkan ShellApi Pada Uses Anda seperti di bawah ini

uses
  ... , shellapi; 

5. Tambahkan Konstanta sebelum Code type

Const
WM_CAllBack = WM_USER;

type 
 .... 

6. Tambahkan Prosedur Baru 

procedure WM_CALLBACKPRO(var msg : TMessage); message wm_callBack;

7. Deklarasikan Variabel berikut (global)

  kecil : HICON;
  TrayIcon : TNotifyIconData;

8. Tambahkan Code berikut di bawah implementation

implementation

Uses comobj;

procedure TForm1.WM_CALLBACKPRO(var msg : TMessage);
var
p : TPoint;
begin
case msg.LParam of
WM_LBUTTONDOWN :
begin
Shell_NotifyIcon(NIM_DELETE,@TrayIcon);
Form1.Visible := True;
end;
WM_RBUTTONDOWN :
begin
GetCursorPos(p);
PopupMenu1.Popup(p.X,p.Y);
end;
end;
end;

9. Klik dua kali Button yang telah anda tambahkan dan letakan kode berikut didalamnya

Form1.Visible := False;
Kecil := application.Icon.Handle;
Trayicon.cbSize := SizeOf(TNotifyIconData);
Trayicon.Wnd := handle;
Trayicon.szTip := 'Click Untuk Memunculkan';
Trayicon.uID := 1;
TrayIcon.hIcon := Kecil;
TrayIcon.uCallbackMessage := WM_CAllBack;
Trayicon.uFlags := NIF_MESSAGE or NIF_ICON or NIF_TIP;
Shell_NotifyIcon(NIM_ADD,@trayicon);

10. Klik dua kali Popup menu anda kemudian klik menu Close dan tambahkan kode berikut

Halt;

Cara Mudah Install Komponen di Delphi

Dengan Mengandalkan Komponen Default Bawaan Delphi 7 saya kira aplikasi  yang kita buat akan monoton (itu-itu saja). oleh karenanya sering kali kita akan di hadapkan untuk menginstall komponen-komponen tambahan untuk Delphi

Secara umum, Ekstensi komponen yang sering saya jumpai adalah sebagai berikut :

Komponen dengan Ekstensi *.DPK (Delphi Package) dan *.PAS
Contoh : Alpha Skin, DBGRIDEh, ZEOS

Komponen dengan Ekstensi *.PAS 
Contoh : MyMD5

Komponen dengan Ekstensi *.EXE (Installer)
Contoh : DevExpress, FastReport, SuiPack

Dari ketiga Ekstensi komponen diatas, dapat kita simpulkan bahwa komponen yang paling mudah di install tentu saja ekstensi *.exe yang sudah jadi satu paket instalasi. namun bagaimana menginstall komponen *.DPK dan *.Pas ? Caranya adalah sebagai berikut.

Untuk Komponen yang ada File *.DPK dan *.PAS nya Caranya Sebagai Berikut

1. Persiapkan Komponen yang akan anda install dan jalankan IDE Delphi anda

2. Pilih Menu Komponen -> Install Komponen -> Pilih Tab Into New Package

3. Pada Unit File Name, Browse Lokasi Komponen Anda (Cari File *.PAS (Blok Semua). Ingat sesuaikan dengan versi Delphi Anda !)

4. Pada Package File Name, Browse Lokasi Komponen Anda (Cari File *.DPK. Ingat sesuaikan dengan versi Delphi Anda !)

5. OK (Kalo Ada Warning Klik Yes Aja) :)

6. Periksa Pallete IDE Delphi Anda (Biasanya akan muncul di Pallete terakhir)

Note :
Untuk Komponen *.PAS saja, Lakukan Langkah 1 Sampai 3 Pada cara di atas. Untuk Package File Name nya Silahkan Isi Manual (Ketik Sendiri).

DBGRIDeh, Untuk Anda Yang Tidak Puas dengan DBGRID

Saya Yakin Sobat Delphi Tutor Sudah tahu kan apa itu DBGRID ?
Yup, Sederhananya, Komponen DBGRID digunakan untuk menampilkan data tabel yang ada di database. Jika pada postingan sebelumnya kita sudah belajar sedikit memodifikasi DBGRID (Memberi Warna dan Menambahkan Komponen Combobox didalamnya), Pada postingan ini saya ingin berbagi tentang komponen DBGRIDeh.

Apa Itu DBGRIDeh ?
Komponen ini sebenarnya sama dengan DBGRID milik Delphi, Hanya saja komponen ini memiliki banyak kelebihan yang tidak dimiliki oleh komponen DBGRID bawaan Delphi. Berikut saya berikan ScreenShoot Contoh Penggunaan DBGRIDeh Ini

Buat Kalian yang berminat, Silahkan Download Komponennya disini Untuk cara install komponen lihat disini sedangkan untuk contoh penggunaanya akan di bahas pada postingan selanjutnya. :)

Koneksi Databas ACCESS dengan Code Delphi

ODBC merupakan connector pilihan dalam mengkoneksikan database Access. Cara yang biasa di pakai orang adalah dengan menggunakan cara visual dengan melakukan koneksi melalui Objek Inspector AdoConnection. Berikut saya mau sharing tentang cara koneksi database access dengan menggunakan coding.

Cara ini sebenarnya jarang dilakukan karena mungkin juga tidak terpikirkan orang. Tapi sebenarnya mengkoneksikan database dengan menggunakan Coding ini Jauh lebih mudah dan manfaatnya juga ketika aplikasi anda dipindahkan ke komputer lain. Aplikasi anda tidak akan Error karena Path Database tidak ditemukan.

Pertama, Buat Sebuah database dengan Microsoft Access dan simpan didalam Folder Projek Anda.

Kedua, Silahkan Copy Code di bawah ini dan letakkan dalam event Form Create

AdoKoneksi.Close;
AdoKoneksi.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0; ' +
                               'Password=""; Data Source= '+
                                ExtractFilePath(ParamStr(0))+'namadatabase.mdb; ' +
                               'Persist Security Info=True';
AdoKoneksi.Open;

Selamat mencoba. :)

ZEOS, Pengganti Connector ODBC

Dalam membuat aplikasi kita tidak pernah lepas dari yang namanya database. dengan delphi, anda dapat mengkoneksikan  database anda dengan berbagai macam connector. namun, connector yang banyak digunakan adalah ODBC. sayangnya, connector ODBC ini tidak jarang membuat masalah semisal tidak mau connect dan semacamnya (Pengalaman Pribadi).

Sebenarnya selain ODBC, banyak connector yang bisa anda gunakan. saya sendiri merekomendasikan anda menggunakan connector ZEOSLib. selain karena Bersifat Free, konfigurasi koneksi dengan connector ini juga tidak serumit ODBC. Anda Dapat mendownloadnya disini

ZEOS atau yang lebih dikenal dengan ZEOSLib (Library ZEOS) merupakan sebuah Projek yang dikembangkan secara massal atau yang lebih dikenal dengan istilah Open Source. Sebenarnya andapun bisa ikut membantu mengembangkannya (Menggunakannya saja kadang masih bingung apalagi mau ikut mengembangkan). hehe

ZEOS juga merupakan connector andalan saya jika membuat aplikasi meskipun tidak jarang juga menggunakan ODBC. Silahkan Baca cara install komponen disini adapun cara menggunakan connector ini akan di bahas pada postingan selanjutnya. stay tune ya. :)

Cara Membuka Link ke Browser dengan Code Delphi

Dalam membuat aplikasi, seringkali seorang aplication creator mencantumkan sebuah link Referensi atau mungkin link About dalam Aplikasi yang mereka buat. Link tersebut akan mengarah ke sebuah halaman situs yang akan memberikan tentang informasi aplikasi itu jika di klik oleh user. menarik bukan ?

Untuk membuat Link yang akan langsung membuka browser jika di klik tidaklah rumit. Murni menggunakan Code Delphi dan tidak sedikitpun menggunakan code HTML atau PHP. hal itu sudah admin buktikan sendiri loohh. caranya, silahkan ikuti step di bawah ini

Pertama, Buka Delphi anda kemudian tambahkan sebuah label dalam Form anda dan ubah captionnya dengan sebuah URL yang akan di buka jika Label itu di klik. misalkan http//:delphitutor.blogspot.com atau anda juga bisa menggunakan URL Blog anda (kan hanya contoh).

Kedua, Klik 1 Kali pada Captionnya dah Ubah Cursornya pada Objek Inspector menjadi Hand (Gambar Tangan)

Ketiga, Tambahkan Uses ShellApi.

Keempat, Tambahkan Code ini pada Event OnClick Milik Label

ShellExecute(Handle, nil, PChar(Label1.Caption), nil, nil, SW_SHOWNORMAL);

Selamat Mencoba.

Cara Membuat Folder dengan Code Delphi

Membuat Folder adalah sebuah hal yang mudah. Semakin berkembangnya sistem operasi menjadikan hal itu semakin tidak terlihat kesulitannya. Membuat folder biasa kita lakukan hanya dengan bermain klik. namun jika sobat pernah bermain command prompt atau Terminal di Linux, hal itu akan sedikit berbeda karena anda akan banyak bermain dengan Teks. Itu Sebabnya kenapa orang dulu hebat-hebat karena mereka tidak menerima sesuatu dengan Instan. tidak seperti orang-orang modern sekarang yang maunya serba instan (Maaf agak melebar pembahasannya).

Agar pembahasannya tidak panjang lebar, jadi langsung saja; Karena postingan ini di buat di Blog Delphi, maka admin akan sharing tentang cara membuat folder dengan code delphi. caranya mudah dan gak pake lama. hehe

Pertama, Buat Variabel Dir

var
Dir: string; 

Kedua, Klik dua kali Button anda dan paste kode ini 

Dir := 'D:\Buat Folder';
ForceDirectories(Dir);
if DirectoryExists(Dir) then
ShowMessage('Folder '+ Dir + ' Sudah di Buat !');

Selamat Mencoba.

Tools Virus Batch File Cleaner

Saya yakin Virus Batch File ini sudah tidak asing lagi bagi sobat Delphi Tutor. Bahkan bisa jadi komputer sobat juga pernah atau malah sedang terinfeksi virus ini. meskipun virus ini tergolong tidak berbahaya namun indikasi yang di timbulkannya cukup untuk sekedar membuat kita kesal. hehe

Cara Kerja Virus ini tergolong sederhana dan gak pake merusak sistem segala. Jika di eksekusi, virus ini akan secara otomatis menggandakan dirinya ke semua folder yang ada di drive tersebut. Kemaren, admin sempat browsing tentang cara penanggulangan virus ini. ternyata cara menghilangkan virus batch file cukup mudah. tidak sesulit merayu cewek. haha

Cara yang banyak di share di internet untuk menghilangkan virus ini adalah dengan merubah code virus itu sendiri yaitu dengan mengganti code Copy dengan Del. admin merasa hal itu cukup memakan waktu maka admin membuat sebuah Tool sederhana untuk memberantas virus ini hanya dengan bermain klik. Jika sobat berminat, silahkan download disini