Lalu lintas data dienkripsi penuh dengan menggunakan encoding Public/Private Key RSA dan AES (256 bit). Standard keamanannya berbasiskan teknologi yang sama dengan https/SSL. Disamping Partner ID, freeware ini meng-generate password setiap kali dijalankan, sehingga akses yang tidak sah tidak bisa terjadi pada remote computer. Anda juga dapat menggunakan Fix Password pada remote PC sehingga anda bisa terhubung dari manapun melalui jaringan internet (dengan catatan anda mengetahui PartnerID dan password/ fix password dari Remote PC).

Untuk dapat menggunakan TeamViewer, software ini harus didownload terlebih dahulu oleh Remote PC dan User PC/ Client PC, sehingga keduanya dapat saling mengakses resource yang ada. Setelah proses download/ unduh selesai, kemudian install-lah (atau anda juga dapat menjalankan TeamViewer tanpa meng-installnya, yaitu dengan memilih Run disamping Install) TeamViewer pada PC anda.

Setelah proses instalasi selesai (atau saat anda menjalankan TeamViewer), anda akan memperoleh ID dan Password secara otomatis. Catatlah ID dan Password tersebut, kemudian beritahukan kepada teman anda yang akan me-remote PC anda.

TeamViewer User Interface

Untuk dapat me-remote PC teman anda, masukkan PartnerID (ID teman anda) pada kotak ID di Tab Create Session (Tab sebelah Kanan), kemudian klik tombol “Connect Partner”. Bila muncul dialog konfirmasi mengenai password, masukkan password yang diberikan oleh teman anda (password remote PC). Kemudian klik OK. Kalau semuanya sudah sesuai, maka selang beberapa waktu desktop PC yang diremote akan muncul.

Download Link :

• http://www.teamviewer.com/download/
• http://download.cnet.com/TeamViewer/3000-7240_4-10398150.html?part=dl-6271747&subj=dl&tag=button

♦ MiTec Interbase Query (http://www.mitec.cz/ibq.html)

By : Michael Mutl

Tools ini dapat melakukan fungsi-fungsi manajemen database lengkap. Didukung dengan fitur SQL Editor dengan Syntax Highliting, Object Explorer, Event Watcher, Performance Monitor, User Manager, dan masigh banyak lagi.

Lisensi : Freeware

♦ Marathon (http://sourceforge.net/projects/gmarathon/)

By : Patrick O’Keeffe

Marathon menggunakan IBO Object sebagai backend nya. Didukung dengan fitur Visual Performance Statistic dan tuning, Exsekusi script, dan sebagainya.

Lisensi : Open Source (MPL)

♦ IBSQL (http://www.ibobjects.com/ibo_ib_sql.html)

By : Jason Wharton

Database management tools yang cepat dan handal. Didukung fitur Datapump, Scripting Tool, SQL Trace Monitor, Export, dan sebagainya. Dibangun dengan backend IBO Object.

Lisensi : Freeware

♦ IBO Console (http://www.mengoni.it/Downloads/)

By : Lorenzo Mengoni

Sangat cocok digunakan untuk anda yang terbiasa menggunakan IB Console (milik borland) dalam memanajemen firebird/interbase database anda. IBO Console mirip sekali tampilannya dengan IB Console buatan borland yang berfungsi untuk memanajemen Interbase database. Dan juga, IBO console memiliki kelebihan fitur yang dapat membantu anda memanajemen database anda lebih baik.

Lisensi : Open Source (MPL)

♦ FenixSQL (http://web.tiscali.it/fblib/)

By : Alessandro Batisti

FenixSQL adalah tool sederhana untuk developing interbase/firebird database yang lumayan kaya akan fitur dan dapat dijalankan baik di Windows maupun Linux (memiliki kompatibilitas dengan Delphi Personal Edition, Kylix Open Edition, Freepascal 2.0.2 atau yang terbaru, dan Turbo Delphi).

Lisensi : Open Source (LGPL)

♦ IBEasy+ (http://www.marc-grange.net/telecharger_en.htm)

By :Marc Grange

IBEasy+ adalah firebird database management tool yang unik dan kaya fitur. Dengan tool ini, anda dapat membuat design dan membuat relasi database dengan sangat mudah karena didukung pemodelan database secara visual.

Lisensi : Freeware

♦ IBAccess (http://sourceforge.net/projects/ibaccess/files/)

By : Tony Martir

IBAccess sangat mirip dengan IBConseole tetapi dengan design yang sangat berbeda. Menggunakan IBX sebagai backend. Dapat dijalankan pada OS Windows dan Linux.

License : Open Source (MPL)

♦ FlameRobin (http://www.flamerobin.org/)

By : Milan Babuskov

FlameRobin adalah Interbase/firebird database management tool yang sangat ringan dan dapat berjalan pada mesin dengan system operasi yang berbeda-beda (Cross Platform)

Lisensi : Open Source (IDPL)

Misal :

• Alamat IP server Firebird Server adalah : 192.168.0.1
• File path Database di server adalah :  d:\ServerClinicData\I2SysClinic.FDB
• Username : MAHENDRA
• Password : MAHENDRAJUGA

• Alamat IP Local/ Mesin Local: Tidak Relevan
• FilePath tempat menyimpan backup file : f:\BackupClinic\I2SysClinic20090913.fbk

Untuk melakukan backup :

• Buka console/command line dengan Start=>Run, kemudian ketik CMD dan klik tombol OK
• ketik perintah gbak -b -v 192.168.0.1:d:\ServerClinicData\I2SysClinic.FDB f:\BackupClinic\I2SysClinic20090913.fbk -user MAHENDRA -pass MAHENDRAJUGA

Catatan :

1. Jika FilePath berisi spasi, gunakan ShortName mode pada console/dos. Misal FilePath server : d:\Backup Data\I2SysClinic.FDB maka ditulis d:\Backup~1\I2SysClinic.FDB
2. User dan password CASE SENSITIVE, artinya : huruf kecil dan huruf besar berbeda. Misal MAHENDRA tidak sama dengan mahendra
3. Sebelum dapat melakukan backup, anda harus men-set FilePath tempat GBak berada pada Path system (Biasanya GBak berada pada direktori  c:\Program Files\Firebird\Firebird_x_x\Bin dimana x_x adalah versi database server anda). Untuk menyertakan GBak pada System Path, anda dapat melakukannya dengan Klik kanan pada My Computer=>Properties=>Advanced=>Environtment Variable. Setelah jendela path muncul, Pilih Add jika variable PATH belum ada atau pilih EDIT kalau variable PATH sudah ada. Tambahkan DirektoryPath tempat GBak berada. Misalkan: c:\Program Files\Firebird\Firebird_x_x\Bin (tambahkan semicolon/ tanda ‘;’ jika untuk memisahkan variable yang sudah ada dengan yang baru jika anda melakukan operasi EDIT pada variable PATH). Klik tombol OK untuk melakukan penyimpanan system path.

Semoga Membantu

Salam,

Reshi Mahendra

Tetapi, jika anda update blog/situs anda dengan interval dibawah 6jam (dengan kata lain, dalam 1 hari melakukan posting lebih dari 3 kali, apalagi pada waktu yang bersamaan), anda perlu hati-hati, karena search engine akan mencurigai anda sebagai “robot” atau melakukan kecurangan pada mesin mereka.

Untuk pengguna wordpress, untuk menambahkan daftar ping dapat dilakukan dengan masuk dalam mode Administrator/ Control Panel=>Option=>Writing. Untuk pengguna Joomla!, anda harus download terlebih dahulu plugins yang menyediakan fitur ping service (misal EasyPing). Berikutadalah daftar ping service, anda dapat menambahkannya pada daftar ping anda.

http://blogsearch.google.com/ping/RPC2

http://1470.net/api/ping

http://api.feedster.com/ping

http://api.moreover.com/RPC2

http://api.moreover.com/ping

http://api.my.yahoo.com/RPC2

http://api.my.yahoo.com/rss/ping

http://bblog.com/ping.php

http://bitacoras.net/ping

http://blog.goo.ne.jp/XMLRPC

http://blogdb.jp/xmlrpc

http://blogmatcher.com/u.php

http://bulkfeeds.net/rpc

http://coreblog.org/ping/

http://mod-pubsub.org/kn_apps/blogchatt

http://www.lasermemory.com/lsrpc/

http://ping.amagle.com/

http://ping.bitacoras.com

http://ping.blo.gs/

http://ping.bloggers.jp/rpc/

http://ping.cocolog-nifty.com/xmlrpc

http://ping.blogmura.jp/rpc/

http://ping.exblog.jp/xmlrpc

http://ping.feedburner.com

http://ping.myblog.jp

http://ping.rootblog.com/rpc.php

http://ping.syndic8.com/xmlrpc.php

http://ping.weblogalot.com/rpc.php

http://ping.weblogs.se/

http://pingoat.com/goat/RPC2

http://rcs.datashed.net/RPC2/

http://rpc.blogbuzzmachine.com/RPC2

http://rpc.blogrolling.com/pinger/

http://rpc.icerocket.com:10080/

http://rpc.newsgator.com/

http://rpc.pingomatic.com

http://rpc.technorati.com/rpc/ping

http://rpc.weblogs.com/RPC2

http://topicexchange.com/RPC2

http://trackback.bakeinu.jp/bakeping.php

http://www.a2b.cc/setloc/bp.a2b

http://www.bitacoles.net/ping.php

http://www.blogdigger.com/RPC2

http://www.blogoole.com/ping/

http://www.blogoon.net/ping/

http://www.blogpeople.net/servlet/weblogUpdates

http://www.blogroots.com/tb_populi.blog?id=1

http://www.blogshares.com/rpc.php

http://www.blogsnow.com/ping

http://www.blogstreet.com/xrbin/xmlrpc.cgi

http://www.mod-pubsub.org/kn_apps/blogchatter/ping.php

http://www.newsisfree.com/RPCCloud

http://www.newsisfree.com/xmlrpctest.php

http://www.popdex.com/addsite.php

http://www.snipsnap.org/RPC2

http://www.weblogues.com/RPC/

http://xmlrpc.blogg.de

http://xping.pubsub.com/ping/

Semoga Membantu

I. Pendahuluan

Borland Interbase Server (Selanjutnya kita sebut IB saja) adalah database server yang sangat handal dan sangat terkenal dikalangan programmer yang menggunakan Borland Delphi sebagai alat untuk mengembangkan aplikasi database-nya. Firebird Server (selanjutnya kita sebut Firebird saja) bisa dibilang sebagai “adik sepupu” dari IB karena fitur dan perluasan bahasa SQL-nya sangat mirip dengan IB. Firebird juga dapat diartikan sebagai versi free dari IB. Dalam tutorial ini, saya akan coba menjabarkan bagaimana cara instalasi Firebird, Administrasi database, koneksi ke IB/Firebird via command line(menggunakan MS-DOS/ cmd.exe) dan via GUI (Graphical User Interface). Khusus untuk koneksi database via GUI, kita akan menggunakan IBO Console yang dapat didownload di situs resmi firebird (www.ibphoenix.com). Interface dari IBO Console sangat mirip dengan IBConsole (GUI tool IB yang langsung terinstall saat anda melakukan instalasi IB server secara default). IBO Console diperlukan disini karena Firebird Server secara default tidak memiliki console GUI untuk administrasi dan management databasenya, disamping itu fitur IBO Console lebih lengkap (menurut opini saya pribadi ) dari IBConsole bawaan IB, dan yang paling penting IBO Console adalah Freeware . Selain itu, saya juga akan membahas bagaimana cara untuk membuat database, table, view, generator, stored procedure dan trigger, dan sebagainya.

II. Instalasi Firebird

Sebelum memulai tutorial ini, anda harus sudah memasang IB/Firebird pada komputer anda. Bila anda sudah menginstal Delphi (Delphi 6 atau yang lebih baru) Profesional/ Enterprise edition dengan mode instalasi default, maka IB sudah terinstalasi pada system anda. Untuk menginstal Firebird, anda harus mendownloadnya terlebih di situs resminya (www.ibphoenix.com). Apabila anda belum memiliki binary/ installer Firebird Server, anda dapat mendownloadnya di situs resmi Firebird (www.ibphoenix.com).

Dalam tutorial ini, saya menggunaka Firebird Server versi 2.0.1 dengan platform Microsoft Windows XP SP1.

Setelah Firebird berhasil anda download, maka lakukanlah pemasangan Firebird dengan langkah-langkah seperti dibawah ini :

1. Klik ganda pada binary/ setup file Firebird yang baru anda download.

Klik OK untuk melanjutkan proses instalasi.

1. Setelah muncul Welcome Screen Instalasi Firebird, Klik next.

2. Setelah muncul jendela ‘License agreement’, centang pilihan ‘I accept the agreement’, kemudian klik ‘Next’.

3. Pilih lokasi instalasi Firebird anda (Defaultnya adalah C:\Program Files\Firebird\Firebird_2_0), kemudian klik ‘Next’. Pada pilihan ‘Install Component’, pilihlah pilihan-pilihan yang ada seperti gambar dibawah ini, klik ‘Next’.

4. Bila pilihan additional task sudah muncul, isilah pilihan-pilihannya seperti gambar dibawah ini, kemudian klik ‘Next’

Kemudian klik install. Tunggu sampai instalasi selesai. Bila jendela konfirmasi untuk me reboot/ restart computer muncul, klik Yes/ Ok .

III. Management Database

1. Via Command Line

Catatan :

Untuk membuka Command Line, pilih ‘Start->Run’, kemudian ketik ‘cmd’ (tanpa tanda petik) lalu klik tombol ‘Ok’.

Sebelum melakukan operasi pada Command Line, pertama-tama, tambahkan terlebih dahulu path lokasi instalasi Firebird kedalam Path system environtment computer anda. Untuk menambahkan Path Firebird kedalam Path system environtment, Lakukan langkah-langkah seperti dibawah ini :

1. Klik kanan pada icon ‘My Computer->Properties’ yang ada pada desktop atau dapat juga dengan meng-klik ‘Start->control Panel->System’.

2. Pilih Tab ‘Advanced’ dan klik ‘Environtment Variables’.

3. Pada Kotak ‘User Varibles for xxx’ (dimana xxx adalah nama computer anda), apabila variable ‘PATH’ belum ada, maka klik tombol ‘New’ dan masukkan ‘PATH’ (tanpa tanda kutip) pada isian ‘Variable Name’, dan lokasi directory bin Firebird (missal anda menginstal Firebird pada lokasi ‘C:\Program Files\Firebird\Firebird_2_0’, maka lokasi directory bin Firebird Server adalah ‘C:\Program Files\Firebird\Firebird_2_0\bin’ tanpa tanda kutip) anda pada isian ‘Variable Value’. Sedangkan bila variable ‘PATH’ sudah ada, klik ‘PATH’, kemudian tekan tombol ‘Edit’. Setelah itu, tambahkan lokasi directory bin Firebird Server pada kotak isian ‘Variable Value’. Ingat, untuk memisahkan variable value, gunakan semi colon (tanda titik koma) pada akhir PATH yang sudah ada, missal (c:\php;C:\Program Files\Firebird\Firebird_2_0\bin)

1. Management User

Secara default SuperUser pada IB/Fireberd adalah ‘sysdba’ dan password defaultnya adalah ‘masterkey’ (tanpa tanda kutip). Untuk alasan keamanan, ubahlah password SuperUser anda setelah instalasi IB/Firebird. Dalam melakukan operasi penambahan/pengubahan/penghapusan data user, dibutuhkan hak akses SuperUser atau user yang memiliki hak akses untuk menambah/mengubah/menghapus data yang ada pada table RDB$USERS pada database security2.fdb.

Dalam melakukan operasi management user, dibutuhkan program gsec.exe yang ada pada directory bin IB/Firebird. Untuk melakukan operasi ini, buka Command Line dan tulislah:

gsec -user A -pass B –<op> C -pw D

Penjelasan :

1. • parameter –user A adalah user yang melakukan operasi. Dalam hal ini yang melakukan operasi adalah user yang bernama A.

   • parameter –pass B adalah password user yang melakukan operasi. Dalam hal ini password A adalah B

   • parameter <OP> C adalah operasi yang dikenakan pada user C dimana <op> adalah operasi yang dilakukan.

Pilihan <op> adalah :

1. • 1. add untuk melakukan penambahan user ,

     2. mo untuk mengubah user (modify), dan

     3. del untuk menghapus user (delete).

Dalam hal ini, operasi yang dilakukan dikenakan pada user yang bernama C.

1. • Parameter –pw D adalah password yang digunakan oleh C dimana D adalah password dari C. parameter ini hanya diperlukan pada operasi penambahan dan pengubahan user saja. Untuk operasi penghapusan user, parameter ini tidak diperlukan.

Missal :

1. • Operasi untuk menambah user dengan nama user1 dan password pwuser1

gsec -user sysdba -pass masterkey -add user1 -pw user1

1. • Operasi untuk mengubah password user dengan nama user1 dan password barunya adalah user123

gsec -user sysdba -pass masterkey -mo user1 -pw user1

1. • Operasi untuk menghapus user dengan nama user1

gsec -user sysdba -pass masterkey -del user1

1. Operasi Database

   1. 1. Membuat Database & Koneksi Database

Untuk membuat database, diperlukan program isql.exe yang ada pada directory binIB/Firebird. Dalam pembuatan database, usahakan sebisa mungkin tidak menggunakan superuser (sysdba), karena sysdba memiliki control penuh pada IB/Firebird Server anda serta dapat melakukan apa saja pada server IB/firebird, termasuk merusak struktur, isi, serta data-data penting yang ada pada database anda. Gunakanlah sysdba hanya untuk management user saja.

Membuat Database

Untuk membuat database baru, bukalah terlebih dahulu Command Line, kemudian ketik ‘isql’ (tanpa tanda petik), lalu tekan enter.

Setelah muncul prompt SQL> , ketik

CREATE DATABASE ‘A’ page_size 1234 user ‘B’ password ‘C’;

Penjelasan :

1. • A adalah nama database beserta full path nya, missal : c:\data\test.fdb atau d:\my data\test.gdb

   • 1234 adalah ukuran page size dari database. Nilai – nilai page size dapat diisi dengan 1024,2048,4096,8192,16384, dan kelipatannya. Secara default, ukuran dari page size adalah 1024.

   • B adalah nama user yang membuat (pemilik) database.

   • C adalah password user pembuat database.

Contoh:

CREATE DATABASE ‘c:\data\POS.fdb’ page_size 1024 user ‘user1’ password ‘user1’;

Kemudian klik Enter.

Maka akan terbentuk database bernama POS.fdb dengan lokasi di c:\data (di drive C pada directory data).

Koneksi ke Database

Untuk koneksi ke database, pada isql, ketik

CONNECT ‘A’ USER ‘B’ PASSWORD ‘C’;

Penjelasan :

• A adalah nama beserta lokasi lengkap (full path) dari database

• B adalah nama user yang akan melakukan koneksi kedalam database.

• C adalah password user yang akan melakukan koneksi.

Contoh :

CONNECT ‘c:\data\POS.fdb’ USER ‘user1′ PASSWORD ‘user1′;

1. 1. 1. Backup/Restore

Backup dapat diartikan sebagai salinan dari file program atau dalam hal ini file database yang dibuat untuk memberi jaminan agar data yang ada tidak hilang atau terhapus apabila terjadi sesuatu pada file aslinya.

Sedangkan Restore dapat diartikan sebagai proses pengembalian file/data dari file backup yang dibuat sebelumnya untuk merecovery kerusakan file asli atau mengembalikan data file asli sesuai dengan isi data file asli saat dibuatnya file backup.

Untuk melakukan backup/restore database, diperlukan program gbak.exe yang ada pada directory bin IB/Firebird.

Secara umum untuk melakukan standard backup/restore, dapat dilakukan dengan mengeksekusi perintah berikut pada Command Line:

Gbak A –[b] B –user C –pas D

Penjelasan

Gbak adalah program yang dipanggil untuk melakukan operasi backup/restore

A adalah file input. Untuk backup, file inputnya berupa file IB/Firebird database (Extensinya : *.gdb | *.fdb | *.ib). Sedangkan untuk operasi restore inputnya berupa file backup (Extensinya : *.gbk | *.fbk | *.ibk).

[b] adalah operasi yang dilakukan. Operasi-operasi dalam penggunaan gbak adalah

-B(ACKUP_DATABASE) backup database ke dalam file

-BU(FFERS) override page buffers default

-C(REATE_DATABASE) membuat database dari backup file

-CO(NVERT) backup external files sebagai tabel

-E(XPAND) tanpa kompresi data

-FA(CTOR) blocking factor

-G(ARBAGE_COLLECT) mencegah data sampah

-I(NACTIVE) mematikan indek saat restore

-IG(NORE) mengabaikan bad checksums

-K(ILL) restore tanpa membuat shadows

-L(IMBO) abaikan transaksi dalam limbo

-M(ETA_DATA) hanya backup metadata

-MO(DE) <access> “read_only” or “read_write” access

-N(O_VALIDITY) tidak merestore kondisi validitas database

-NT Format backup file Non-Transportable

-O(NE_AT_A_TIME) restore satu tabel saja

-OL(D_DESCRIPTIONS) simpan deskripsi metadata yang lama

-P(AGE_SIZE) override page size default

-PAS(SWORD) Firebird password

-R(ECREATE_DATABASE) [O(VERWRITE)] membuat (atau mengganti bila OVERWRITE digunakan) database from backup file

-REP(LACE_DATABASE) mengganti database dari file backup

-RO(LE) Firebird SQL role

-SE(RVICE) gunakan manager service

-T(RANSPORTABLE) transportable backup-data dlm format XDR

-USE_(ALL_SPACE) tanpa membuat cadangan untuk versi record

-USER Firebird user name

-V(ERIFY) laporkan tiap aksi yang diambil

-Y <path> redirect/suppress status message output

-Z cetak version number

Contoh :

Backup :

Gbak c:\POS.fdb –b c:\POS_2007_aug_16.fbk –user user1 –pas user1

Perintah diatas akan membuat file backup yang bernama POS_2007_aug_16.fbk yang terletak di drive c:\ dari file database yang bernama POS.fdb yang terletak pada drive c:\. Operasi backup ini dilakukan oleh user1 dengan password dari user1 adalah user1.

Restore :

Gbak c:\POS_2007_aug_16.fbk –c c:\POS_Restore.fdb –user user1 –pas user1

Perintah diatas akan membuat file database yang bernama POS_Restore.fdb yang terletak pada drive c:\. Dimana POS_Restore.fdb ini dibuat dari backup file bernama POS_2007_aug_16.fbk yang terletak di drive c:\. Operasi ini dilakukan oleh user yang bernama user1 dengan passwordnya adalah user1 juga.

Pengantar

Bagi para programmer Windows yang biasa menggunakan Borland Delphi (selanjutnya saya akan sebut delphi saja) sebagai “developing tool”-nya dan ingin bermigrasi ke -linux, sudah pasti pernah mendengar Borland Kylix (Delphi versi linux. Selanjutnya saya sebut kylix saja) dan Lazarus. Tapi sangat disayangkan sekali, Borland sudah tidak melanjutkan lagi pengembangan kylix. Versi Kylix terakhir hanya sampai versi 3. Oleh sebab itu, banyak dari programmer delphi yang mau pindah platform atau sekedar ingin mencoba developing aplikasi pada platform *.nix menggunakan lazarus. Lazarus dapat disetarakan seperti Qt milik Trooltech (IDE berbasis RAD dengan C++ sebagai main language-nya) dan Gambas (IDE Basis RAD dengan Basic sebagai main language-nya. Memiliki tampilan mirip seperti Visual Basic. Cocok bagi ) pada linux. Yang lebih menggembirakan dan membuat Lazarus lebih menarik adalah lazarus open source. disamping itu, Lazarus juga tersedia untuk platform Windows.

Installasi

Beberapa paket yang dibutuhkan untuk dapat menggunakan Lazarus adalah

1. Free Pascal Compiler (selanjutnya saya sebut FPC saja)

2. Free Pascal Library (selanjutnya saya sebut FPL saja)

3. libgtk2.0-dev

4. libgdk-pixbuf-dev

Sebelum melakukan instalasi, download terlebih dahulu paket-paket FPC dan FPL. anda dapat mendownloadnya di http://sourceforge.net/project/showfiles.php?group_id=89339.

Catatan : Versi terakhir Lazarus saat artikel ini ditulis adala Lazarus v.0.9.22

Untuk pengguna debian atau distro dengan basis debian (seperti ubuntu, knoopix dsb) dengan arsitektur i386, Downloadlah file fp_all_deb.tar dan lazarus_0.9.22-1_i386.deb dimana dalam paket fp_all_deb.tar berisikan file-file berikut :

1. fpc-crosswin32_2.0.4-060919_i386.deb

2. fp-compiler_2.0.4-1_i386.deb

3. fpc-src_2.0.4-1_i386.deb

4. fp-ide_2.0.4-1_i386.deb

5. fp-units-base_2.0.4-1_i386.deb

6. fp-units-db_2.0.4-1_i386.deb

7. fp-units-fcl_2.0.4-1_i386.deb

8. fp-units-fv_2.0.4-1_i386.deb

9. fp-units-gfx_2.0.4-1_i386.deb

10. fp-units-gnome1_2.0.4-1_i386.deb

11. fp-units-gtk_2.0.4-1_i386.deb

12. fp-units-gtk2_2.0.4-1_i386.deb

13. fp-units-misc_2.0.4-1_i386.deb

14. fp-units-net_2.0.4-1_i386.deb

15. fp-units-rtl_2.0.4-1_i386.deb

16. fp-utils_2.0.4-1_i386.deb

Untuk keterangan lebih lanjut mengenai FPC dan FPL, anda dapat membacanya di http://wiki.lazarus.freepascal.org/FPC_documentation

Setelah semua file diatas didownload, install paket-paket FPC, paket libgtk2.0-dev dan libgdk-pixbuf-dev, kemudian masuklah ke direktory tempat anda menyimpan file hasil download tersebut. Misal anda menyimpannya pada direktory /home/(namauser)/download/lazarus/, maka ketik perintah ini pada terminal :

cd ~/download/lazarus/ && sudo dpkg -i *.deb &&sudo apt-get install libgtk2.0-dev libgdk-pixbuf-dev

Catatan : Paket lazarus “HARUS” diinstal paling terakhir

sudo dpkg -i lazarus_0.9.22-1_i386.deb

untuk mengecek apakah FPC sudah terinstall dengan benar, ketik perintah dibawah pada terminal :

fpc -i

atau

fpc -i grep -> ~/log-fpc.txt

perintah kedua untuk menyimpan informasi instalasi FPC ke dalam file log-fpc.txt di direktory /home/(namauser)/

Bila instalasi FPC berjalan dengan baik, maka anda akan mendapatkan informasi instalasi kurang lebih seperti dibawah ini :

Free Pascal Compiler version 2.0.4

Compiler Date : 2006/08/22

Compiler CPU Target: i386

Supported targets:

GO32 V2 DOS extender

Linux for i386

OS/2

Win32 for i386

FreeBSD/ELF for i386

Solaris for i386 (under development)

Beos for i386 (under development)

NetBSD for i386 (under development)

Netware for i386(clib)

WDOSX DOS extender

OpenBSD for i386 (under development)

OS/2 via EMX

Watcom compatible DOS extenders

Netware for i386(libc)

Linux for x64_6432

Supported CPU instruction sets:

386

PENTIUM

PENTIUM2

PENTIUM3

PENTIUM4

PENTIUMM

Supported FPU instruction sets:

SOFT

X87

SSE

SSE2

SSE3

This program comes under the GNU General Public Licence

For more information read COPYING.FPC

Report bugs,suggestions etc to:

bugs@freepascal.org

Untuk menjalankan Lazarus, ketik perintah dibawah ini pada terminal;

lazarus

Selamat Mencoba

Pada bagian berikutnya, saya akan posting tentang “Tutorial Pemrograman dengan QT4 Designer [Pengenalan IDE Qt] bagian II”

Pada bagian II, saya akan menjelaskan fitur2 yang ada pada QT, shortcut key, dan contoh aplikasi sederhana yang dibuat dengan Qt .

Dari sisi sudut pandang, pemrograman component sangatlah beda dengan pemrograman aplikasi secara umum. Kalau pemrograman aplikasi, orientasinya dititik beratkan pada pemakai akhir (end user) yang akan menggunakan aplikasi tersebut, yaitu bagaimana caranya agar user mudah mengoperasikan aplikasi, fleksibel, dan sebagainya. Sedangkan sudut pandang component writer/programmer adalah bagaimana caranya agar programmer yang akan memakai component-nya dapat memenuhi kebutuhan sang programmer. Sehingga sang programmer pemakai component tersebut tidak perlu lagi menulis kode program (yang mungkin sangat kompleks) yang sama sampai berulang-ulang hingga dapat menghemat waktu, tenaga dan biaya.

Di bawah ini adalah contoh komponent sederhana turunan dari TEdit,Saya namakan TReshiEdit. Fitur yang saya contohkan disini adalah untuk mengubah warna EditBox saat terfokus, dan kembali ke warna sebelumnya saat fokus meninggalkan EditBox, Serta pilihan fungsi edi, yakni untuk input telephone, input normal, dan input angka. Disini juga dikenalkan fungsi propercase, yakni untuk mengubah semua huruf awal dari sebuah kata menjadi huruf besar.

Listing programnya adalah sebagai berikut :

{**********************************************************************
Author : I GEDE MADE RESHI MAHENDRA
Copyright © 2005-2006
E-mail: reshimahendra@reshimahendra.net.tf
reshimhendra@gmail.com
Web: http://www.reshimahendra.net
Component Name : TReshiEdit

**********************************************************************}
unit DrakeCommon;

interface

uses
SysUtils, Messages,Classes, Controls, StdCtrls, Forms, Graphics, WinProcs;

Const
Author = ‘Copyright(C) I Gede Made Reshi Mahendra (reshimahendra@gmail.com)’;

{******************
** DRAKE EDIT **
******************}
type
//Mode Caracter Case
TCaseMode = (cmNormal, cmProperCase, cmLowerCase, cmUpperCase);

//Mode Type Edit
TEditStyle = (esNormal,esPhone, esNumeric);

TreshiCustomEdit = class(TCustomEdit)
private
FAbout : String;
FAlignment: TAlignment;
FEnterLikeTab : boolean;
FFocusedColor: TColor;
FCaseMode: TCaseMode;
FMouseINColor: TColor;
FMouseOutColor: TColor;
FMousePos : Boolean;
FEditStyle: TEditStyle;
FUnFocusedColor: TColor;
FCanEmpty: Boolean;

procedure setAbout(Value: String);
procedure SetEditStyle(Value: TEditStyle);
procedure setAlignment(Value: TAlignment);
procedure setFocusedColor(Value: TColor);
procedure setCaseMode(Value: TCaseMode);
procedure setUnFocusedColor(Value: TColor);
procedure setCanEmpty(Value: Boolean);

protected
procedure doEnter;override;
procedure doExit;override;
procedure keyPress(Var Key:Char);override;
procedure KeyDown(var Key: Word; Shift: TShiftState);override;

//CustomProperty
property Alignment : TAlignment
read FAlignment write setAlignment default taLeftJustify;
property FocusedColor : TColor
read FFocusedColor write setFocusedColor default clSkyBlue;
property UnFocusedColor : TColor
read FUnFocusedColor write setUnFocusedColor default clWhite;
property CharCase : TCaseMode
read FCaseMode write setCaseMode default cmNormal;
property EnterLikeTab : boolean
read FEnterLikeTab write FEnterLikeTab;
property EditStyle : TEditStyle
read FEditStyle write setEditStyle default esNormal;

public
procedure CreateParams (var Params: TCreateParams);Override;

constructor Create (AOwner : TComponent);override;
destructor destroy;override;

//Additional procedure/ function
function IsBlank:boolean;
published
property About : String
read FAbout write setAbout;
property CanEmpty : Boolean
read FCanEmpty write setCanEmpty default True;

End;

TreshiEdit = Class(TreshiCustomEdit)
published
Property About; property Alignment;
property FocusedColor; property UnFocusedColor;
property EnterLikeTab; property CharCase;
property EditStyle; property PasswordChar;
property Text; property Color;
property DragCursor; property DragMode;
property Enabled; property Font;
property HideSelection; property ParentColor;
property ParentCtl3D; property ParentFont;
property ParentShowHint; property PopupMenu;
property ReadOnly; property ShowHint;
property TabOrder; property TabStop;
property Visible; property MaxLength;

property OnChange; property OnClick;
property OnDblClick; property OnDragDrop;
property OnDragOver; property OnEndDrag;
property OnEnter; property OnExit;
property OnKeyDown; property OnKeyPress;
property OnKeyUp; property OnMouseDown;
property OnMouseMove; property OnMouseUp;
end;

procedure Register;

implementation

uses Windows;

procedure Register;
begin
RegisterComponents(‘Reshi Mahendra’, [TReshiEdit]);
end;

{ TreshiEdit }

constructor TreshiCustomEdit.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
FAbout := Author;
FCanEmpty := True;
BevelKind := bkFlat;
BorderStyle := bsNone;
FFocusedColor := clSkyBlue;
FUnFocusedColor := clWhite;
FMousePos := true;
FMouseINColor := clInfoBk;
FMouseOutColor := clWhite;
ControlStyle := ControlStyle – [csSetCaption];
Height := 21;
Text := ”;
FAlignment := taLeftJustify;
FEnterLikeTab := true;

//Disable popup
PopupMenu := nil;
end;

procedure TreshiCustomEdit.setCanEmpty(Value: Boolean);
begin
if FCanEmpty<>value then begin
FCanEmpty := Value;
Invalidate;
end;
end;

procedure TreshiCustomEdit.doExit;
begin
Color := FUnFocusedColor;

Text := Trim(Text);
Invalidate;

inherited doExit;
end;

procedure TreshiCustomEdit.KeyDown(var Key: Word; Shift: TShiftState);
var
FEditTemp : TCustomForm;
begin
inherited KeyDown(Key,Shift);

if (Key = 13) and FEnterLikeTab then
begin
FEditTemp := GetParentForm(Self);

SendMessage(FEditTemp.Handle, WM_NEXTDLGCTL, 0, 0);
Key := 0;
exit;
end;

end;

procedure TreshiCustomEdit.keyPress(Var Key:Char);
Function IsNumeric : boolean;
begin
Result := (Key in ['0'..'9']) or (key =#13) or (Key = #8) //numeric,CariageReturn & BackSpace
end;
begin
inherited keyPress(key);
if (FEditStyle = esPhone) then begin
If not((IsNumeric)
Or (Key = #32) //space
or (Key = #40) // ‘(‘
or (Key = #41) // ‘)’
or (Key = #43) // ‘+’ for country code
or (Key = #45)) then // ‘-’
Key := #0;
end else if (FEditStyle = esNumeric) then begin
if not IsNumeric then Key := #0;
end;

case FCaseMode of
cmProperCase : begin
if (SelStart = 0) or (Text[SelStart] = ‘ ‘) then
Key := AnsiUpperCase(Key)[1];
end;
cmUpperCase : begin
Key := AnsiUpperCase(Key)[1];
end;
cmLowerCase : begin
Key := AnsiLowerCase(Key)[1];
end;
end;

Invalidate;
end;

procedure TreshiCustomEdit.SetEditStyle(Value: TEditStyle);
begin
if (FEditStyle <> value) then begin
FEditStyle := Value;

if (FEditStyle = esPhone) then begin
Alignment := taLeftJustify;
Text := ‘(999)-99999999′;
end
else if (FEditStyle = esNormal) then begin
Alignment := taLeftJustify;
Clear;
end else if (FEditStyle = esNumeric) then begin
Alignment := taRightJustify;
Clear;
end;
end;
end;

destructor TreshiCustomEdit.destroy;
begin
inherited destroy;
end;

procedure TreshiCustomEdit.CreateParams(var Params: TCreateParams);
const
Alignments: array[TAlignment] of Word = (ES_LEFT, ES_RIGHT, ES_CENTER);
begin
inherited CreateParams(Params);
Params.Style := Params.Style or Alignments[FAlignment];
end;

procedure TreshiCustomEdit.setAlignment(Value: TAlignment);
var
theSelStart, theSelLength : Byte;
begin
if FAlignment <> Value then
begin
theSelStart := SelStart;
theSelLength := SelLength;
FAlignment := Value;
RecreateWnd;
SelStart := theSelStart;
SelLength := theSelLength;
end;
end;

procedure TreshiCustomEdit.setUnFocusedColor(Value: TColor);
begin
if FUnFocusedColor <> value then begin
FUnFocusedColor := Value;
invalidate;
end;
end;

procedure TreshiCustomEdit.doEnter;
begin
Color := FFocusedColor;
Text := Trim(Text);
Invalidate;

inherited doEnter;
end;

procedure TreshiCustomEdit.setFocusedColor(Value: TColor);
begin
if (FFocusedColor <> value) then
begin
FFocusedColor := Value;
Invalidate;
end;
end;

procedure TreshiCustomEdit.setCaseMode(Value: TCaseMode);
begin
if (FCaseMode <> Value) then
begin
FCaseMode := Value;
Invalidate;
end;
end;

function TreshiCustomEdit.IsBlank: boolean;
begin
Result := Text = ”;
end;

procedure TreshiCustomEdit.setAbout(Value: String);
begin
FAbout := Author;
end;

end.

Apabila ada pertanyaan, mail saya di reshimahendra@gmail.com

kalau saya bisa jawab pertanyaan rekan-rekan, saya akan reply pesan rekan-rekan. Saya harap, kita bisa belajar bersama-sama dan dapat memajukan IT di indonesia.

Terima kasih

Reshi Mahendra