Cara Buat DLL sederhana di Delphi

DLL – Buat dll sederhana

Tingkatan	Pemula
Kategori	System
Sub Kategori	DLL
Judul	Membuat dll sederhana
Oleh	Nama Eko Indriyawan Domisili Surabaya – Darmo Satelit Delphi Delphi 2007 for Win32 YM eko_elits Email eko_elits@yahoo.com Telp 031 – 605 384 36
Referensi	http://delphi.about.com/od/windowsshellapi/a/dll_basics.htm
	http://www.delphi3000.com/articles/article_4460.asp?SK=( login dulu, apabila belum punya account, silahkan anda register terlebih dahulu )
Tujuan	Mengajarkan kepada Delphier untuk membuat dll sederhana.
	spasi
Overview	Pembahasan pada artikel ini masih sederhana, sehingga masih banyak yang bisa dikembangkan sesuai dengan kebutuhan program anda nantinya. Namun paling tidak dari contoh dan pembahasan yang diberikan sudah bisa sedikit memberikan gambaran kepada delphier untuk membuat file dll. Artikel ini sangatlah menarik, kenapa dikatakan menarik? karena dari file dll, kita bisa menyimpan beberapa fungsi dan prosedur yang secara tidak langsung ini bisa digunakan alasan untuk memperkecil jumlah baris program di program utama. Keuntungan dengan menggunakan dll adalah bisa mengurangi besar file application hasil compile. Diharapkan dengan contoh yang sederhana ini mampu memberikan inspirasi kepada Delphier dalam membuat program aplikasi yang lebih kompleks.
	spasi
Petunjuk :	Silahkan anda ikuti langkah – langkah berikut ini dengan pelan – pelan agar bisa berjalan dengan lancar sesuai dengan petunjuk yang sudah diberikan.
	spasi
Langkah 1	Pilih menu File. ( tekan tombol Alt + F ).
Langkah 2	Lanjutkan dengan memilih sub menu New ( tekan tombol N ).
Langkah 3	Setelah itu pilih item Other…( tekn tombol O ). Tunggu beberapa saat hingga didapatkan tampilan kotak dialog seperti berikut ini.
Langkah 4	Pilih item categories-nya dengan Delphi Projects.
Langkah 5	Pada bagian windows sebelah kanan, silahkan pilih item DLL Wizard.
Langkah 6	Lanjutkan dengan menekan tombol OK. Tunggu beberapa saat hingga didapatkan kode program seperti berikut ini.
	libraryProject1; { Important note about DLL memory management: ShareMem must be the first unit in your library’s USES clause AND your project’s (select Project-View Source) USES clause if your DLL exports any procedures or functions that pass strings as parameters or function results. This applies to all strings passed to and from your DLL–even those that are nested in records and classes. ShareMem is the interface unit to the BORLNDMM.DLL shared memory manager, which must be deployed along with your DLL. To avoid using BORLNDMM.DLL, pass string information using PChar or ShortString parameters. } uses SysUtils, Classes; {$R *.res} begin end.
Langkah 7	Silahkan anda simpan project tersebut dengan nama ContohDLL.
Langkah 8	Silahkan anda buat fungsi PesanYangAndaSampaikan. Untuk lebih jelasnya silahkan anda lihat potongan kode program dibawah ini.
	… … function PesanYangAndaSampaikan(var data : string): string; export; begin result:= ‘Pesan yang anda sampaikan adalah ‘+QuotedStr(data); end; … …
	Berdasarkan potongan kode program diatas, jangan lupa untuk mengakhiri fungsi dengan export
Langkah 9	Lakukan proses export fungsi. Untuk lebih jelasnya silahkan anda lihat potongan kode program dibawah ini.
	… … exportsPesanYangAndaSampaikan; … …
	Kode Program secara lengkap dapat anda lihat pada listing program berikut ini.
	libraryContohDLL; { Important note about DLL memory management: ShareMem must be the first unit in your library’s USES clause AND your project’s (select Project-View Source) USES clause if your DLL exports any procedures or functions that pass strings as parameters or function results. This applies to all strings passed to and from your DLL–even those that are nested in records and classes. ShareMem is the interface unit to the BORLNDMM.DLL shared memory manager, which must be deployed along with your DLL. To avoid using BORLNDMM.DLL, pass string information using PChar or ShortString parameters. } uses SysUtils, Classes; {$R *.res} PesanYangAndaSampaikan(var data : string): string; export; begin result := ‘Pesan yang anda sampaikan adalah ‘+QuotedStr(data); end; exportsPesanYangAndaSampaikan; begin end.
Langkah 8	Silahkan anda compile. Tekan tombol Ctrl + F9. Tunggu beberapa saat… ( Sedang di cek kode programnya ).
	Apabila tidak muncul pesan error, berarti program yang anda buat telah berhasil dan silahkan anda cek pada folder dari project tersebut disimpan. Jika didapatkan file dengan nama ContohDLL.dll, maka itu berarti file dll sudah berhasil dibuat.
	spasi
Langkah 11	Program sudah selesai anda buat dan silahkan program aplikasinya anda tutup.
	spasi
Harapan	Semoga artikel ini bisa bermanfaat. Silahkan anda berikan informasi ini kepada teman – teman anda yang belum tahu. Mari kita wujudkan kemajuan IT Indonesia bersama dengan teman – teman yang lain dengan Delphi sebagai media pemupuk kebersamaan.
Download	Membuat file dll sederhana Silahkan anda download link diatas untuk mendapatkan contoh program aplikasi secara lengkap. Ada beberapa masukan dan keluhan dari teman – teman, bahwa ada beberapa program contoh tidak bisa dijalankan dari delphi 7. Hal ini dikarenakan program contoh dibuat dengan menggunakan Delphi 2007 for win32. Apabila anda menggunakan D7, sebaiknya anda mengikuti pandauan dari langkah – langkah yang sudah diberikan. Atas perhatiannya, saya mengucapkan banyak terimakasih.
Link terkait
Buku panduan	Dasar First Step To Be A Programmer Menengah Pemrograman Database dengan Delphi dan MS SQL Server Menengah Membangun database MLM