Skip to main content

Posts

Showing posts from August, 2016

Cara Merubah Awal Kata Menjadi Kapital pada LAzarus

Setelah sebelumnya kita mempelajari cara membalik urutan karakter pada string, sekarang kita coba membuat program mengubah huruf pada awal kata menjadi kapital. Pertama mari kita buat fungsi Capword seperti di bawah ini. Dengan fungsi ini anda dapat mengubah karakter pertama dari suatu kata menjadi huruf kapital. Fungsi Capword hanya mempunyai satu parameter, yaitu string yang akan diubah. type   { TForm1 }   TForm1 = class(TForm)     function CapWord(teks:string):string; //tulis disini kodenya private Selanjutnya pada bagian implementation tuliskan kode berikut: //fungsi Capitalize each Word function TForm1.CapWord(teks:string):string; var   i : integer;   s : string; begin   s:=Uppercase(teks[1]);   for i:=2 to length(teks) do     if (teks[i-1] in [' ','?','!',',',':',';','.']) then s:=s+uppercase(teks[i]) else       s:=s+lowercase(teks[i]);   result:=s; end; Selanjutnya tambahkan 2 buah komponen Edit dan

Membalikkan urutan karakter pada string dengan Lazarus

Saat anda membuat aplikasi, seringkali anda harus berhubungan dengan string. Lazarus telah menyediakan banyak sekali prosedur dan fungsi yang berhubungan dengan string. Tapi ada hal-hal tertentu seperti membalik urutan karakter pada string yang tidak disediakan prosedur atau fungsinya. Sekarang mari kita coba Membalikkan urutan karakter pada string dengan Lazarus . Cara membalikkan urutan karakter dengan lazarus Buat aplikasi baru dengan nama reversestring. Selanjutnya mari kita buat fungsi baru untuk membalik urutan karakter dengan nama ReverseString. Kalau masih dalam tampilan visual (tampak Form1) tekan F12 untuk masuk ke source editor, Tulis sesudah type TForm1 = class(TForm) dan sebelum private . type   TForm1 = class(TForm)      function ReverseString(s: string):string; //tulis disini fungsinya   private Kemudian tulis di bagian implementation kode berikut: function TForm1.ReverseString(S: string):string; var    i : integer;    s2 : string; begin    s2:='

Mendisable Menu System Close pada Lazarus

Sebuah form yang normal biasanya mempunyai tiga tombol yang terletak pada bagian title bar, yaitu tombol maximize untuk menampilkan form secara penuh, tombol minimize untuk menyembunyikan form aktif ke taksbar, dan tombol close untuk menutup form. Bagaimana caranya mendisable system menu? Untuk aplikasi tertentu mungkin anda ingin "memaksa" para pengguna program anda dengan hanya dapat menutup program melalui menu yang telah anda sediakan. Dengan demikian mereka tidak dapat menutup program melalui menu close tersebut. Untuk itu anda dapat mendisable system menu tersebut. Gambar form denga system menu normal Pada properties Form1 pilih >> BorderIcon , jika gambar checlist seperti di atas yaitu biMaximize, biMinimize dan biSystemMenu centang semua (true) itu adalah konfigurasi default dari system menu pada form. Gambar Menu yang Minimeze-nya disable Untuk membuat form dengan menu minimize disable caranya pada properties Form1 pilih >> BorderIcon

Memperkecil ukuran file exe lazarus free pascal

Benar-benar kaget saya, setelah beberapa lama menggunakan lazarus free pascal baru hari ini tepatnya Minggu, 28 Agustus 2016 bahwa ternyata hasil file exe (executabel) yang dihasilkan sangat besar. Bayangkan saya form sederhana dengan satu komponen button saja ukuranya bisa sekitar 15 MB. Setelah mencari info di forum lazarus akhirnya saya menemukan solusi agar bisa memperkecil ukuran file EXE lazarus free pascal . Cara Memperkecil Ukuran Executable File Lazarus Pertama silahkan pilih pada menu: Project >> Project Options Atau kalau menggunakan tombol shortcut tekan saka tombol Shift+Ctrl+F11   Selanjutnya pada Compiler Option saya pilih Debuging . Saya hilangkan tanda centang pada: Generate debungging info for GDB (slower / increase exe-size) Kemudian saya tambahkan centang pada: Strip symbols from executable (-Xs) . Trus tidak lupa saya simpan dengan menekan tombol OK . Saya tekan F9 (Run) untuk menjalankan programnya, dan selanjutnya saya cek besarnya file E

Inilah Kelebihan dan Kekurangan SQLite

  Artikel ini akan membahas tentang, tipe data yang didukung SQLite,  kelebihan dari SQLite, kekurangan SQLite, kapan sebaiknya ketika menggunakan SQLite dan kapan sebaiknya kita tidak menggunakan SQLite. Merujuk dari id.wikipedia.org disebutkan bahwa SQLite merupakan sebuah sistem manajemen basisdata relasional yang bersifat ACID-compliant dan memiliki ukuran pustaka kode yang relatif kecil, ditulis dalam bahasa C. SQLite merupakan proyek yang bersifat public domain yang dikerjakan oleh D. Richard Hipp . SQLite adalah perpustakaan menakjubkan yang disematkan di dalam aplikasi yang menggunakan. Sebagai database mandiri, berbasis file, SQLite menawarkan serangkaian menakjubkan alat untuk menangani segala macam data dengan jauh lebih sedikit kendala dan kemudahan dibandingkan dengan host, proses berbasis (server) database relasional. Ketika sebuah aplikasi menggunakan SQLite, integrasi bekerja dengan panggilan fungsional dan langsung dibuat untuk file memegang data (yaitu SQLite da