Ide: Membuat Library dan membuka DLL / so dengan Lazarus


Beberapa hari yang lalu ada sebuah ide muncul di kepala ini, bagaimana kalau seandai-nya bisa memecah modul program yang aku buat menjadi beberapa file yang bisa di update atau di buang setiap saat, dengan modul konfigurasi tentu-nya.
Maka di mulai lah perjalanan-ku dalam mencari bagaimana cara-nya di lazarus, tentu saja memang solusi-nya yang sekilas keluar di mata adalah BPL, cuma masalah-nya kalau di lazarus tidak bisa compile library dan di load pada saat runtime, hilang 1 opsi, maka setelah itu aku coba cari opsi lain, AHA ! DLL aja tuh.. Dynamic Link Library kalau di windows, .so kalau di linux.. di Mac aku ngga tau.. setelah beberapa saat browsing.. aku menemukan beberapa kendala dalam penggunaan dan pembuatan library di lazarus dan sangat mencolok adalah ngga bisa-nya fungsi ShareMem yang ngga bisa di pakai.
tapi memang belum afdol kalau tidak dicoba sendiri.

oke..
pertama kita bikin library-nya..
  • Buka IDE Lazarus
  • Buka New.. Project | Library
  • Setelah itu kita akan di sajikan editor windows tanpa ada yang lain-nya, kita coba simpan dulu dengan nama Library1
  • Mari kita lanjutkan dengan membuat 1 buah function dengan 1 parameter by reference dengan tipe PPChar
function test(var x:PPChar):Integer;export;
  • Untuk definisi variable-nya kita isi dengan
s: String;
  • Lalu kita isi badan-nya dengan
01| s := 'Hello_World';
02| x := StringToPPChar(s,0);
  • selanjutnya kita compile project tersebut
  • dan Voila ! file lib kita sudah jadi.. cari file Library1.lib
Lalu setelah Library-nya jadi, selanjut-nya kita buat aplikasi untuk memanggil-nya
  • Buka IDE Lazarus
  • Buka New.. Project | Application
  • Pada form pasang sebuah button
  • Pada definisi uses tambahkan unit DynLibs
  • Pada daftar variable di even OnClick tuliskan
l : TLibHandle;
f: function (var x:PPChar) :integer;
s: String;
p: PPChar;
  • selanjut-nya pada bagian badan tuliskan
01| l := LoadLibrary('library1.dll');
02| pointer(f) := GetProcAddress(l, 'test');
03| f( p);
04| s:=StrPas(p^);
05| showmessage(s);
06| FreeLibrary(l);
  • dan itu lah semua, yang perlu di lakukan selanjut-nya cuma tekan F9 untuk mencoba eksekusi program tersebut
  • Pada form tampilan tersebut tekan Button yang ada, dan kita akan melihat sebuah message box tang akan menampilkan kata Hello_World yang kita buat di Library bukan di Aplikasi-nya.
  • Ini menunjukkan bahwa lazarus bisa membuat library dan menggunakan library dinamis(Dynamic Library)
Keren kan? memang lazarus bisa di gunakan untuk membuat dan menggunakan library, tapi...
(memang ada tapi-nya sih) dengan cara di atas kita tidak bisa membuat library yang mengalokasikan memory di dalam library dan membagikan area memory tersebut ke pemanggil/host, saat ini aku sedang melihat kemungkinan ada cara lain dengan memanfaatkan memory manager, apa itu? aku sendiri belum tahu.. sedang membaca lebih lanjut
mungkin kalau sudah penasaran duluan silakan buka
di bagian bawah ada link yang memberikan contoh yang seperti-nya cukup menarik

referensi:

Komentar

Posting Komentar

Postingan populer dari blog ini

Waaarrrggghhhh Waarrgghhh ? (What happened ?i)

Uuurrghhh gggrraaahhhhh eergghhh hheeerrgghhh... grrhhggghhg ffrrrrbbmmmlll grrrgh kaaaarrrrrkkkkkhhhhh? (today i realize that i already became a zombie, the question is what did i've done that i became like this?) diidddrrd dthyyygrrgghh rghhryyyss ggrrh? orr ggrffmm drgaggddghhhhy frrgggiiyyy ggghh dfghhhhllmnn ssaghhhrrryyy ? (did i get bored being alone and helpless ? or is it because too many incoming tasks while i cannot quicly understand the problem ? ) mmmmbbbbbyyyy dddidgggghhhhrryyy ggghhhyyyfffffmnnnn.. tooo bbssssyyy hhhggghlnngg ooothhhrrrrr....... (maybe because i just unable to manage all of them enough now... to bussy in helping other with their problem while i forgeting my own problem..) nnnewwww sttttarrrrtttt nnnnnnddddd hhhhhhooooopppppp.... (i hope a new start can give me a better insight of what should i do) ppppoooosssiiiittttiiiiivvvvvv (just try being a more positive thinking type person ) uuunndddddrrrrrsttttmmmttt nnnniiichhhhttt... oorrrrgggggnnnzz...
Baca selengkapnya

software application

In term of application software construction, sometimes the primary goals that i thought is that giving a deliverable, which is an application running with out problem program.. with the application program is standing on some infrastructure such as Operating System, Virtual Machine, and also built upon some language that most popular so that it's continuity support is guaranteed. but recently i crossed my mind, that the main commodity that we should provide is the service to gather information and in unified way so that enable us to easily retrieve in sometime in the future. so.. in that context i can say that the main deliverable is the mechanism and steps to help our client to gather data in unified way.. hm.. i think this is a basic knowledge that thought in MIS Lecture.. but who am i but some who damned to remember again and again.. hehehe like they say, more often you stumbled into something same, the more expert you'll be come.
Baca selengkapnya