Category Archives: Delphi
Tips: Insert Ribuan Record MySQL dengan Delphi 7
Jika anda memiliki ribuan record misalnya dari table lain untuk di insert ke dalam sebuah table MySQL maka biasanya cara dilakukan adalah dengan looping seperti ini : while not rs1.eof do begin rs2.insert; rs2.FieldByName(‘field1′).AsString := rs1.FieldByName(‘field1′).AsString; rs2.FieldByName(‘field2′).AsString := rs1.FieldByName(‘field2′).AsString; rs2.Post; rs1.Next; end Tidak ada yang salah dengan kode di atas, tapi cobalah insert [...]
Kirim Email dengan Attachment Menggunakan Delphi 7 (Source Code)
Beberapa hari kemarin seorang pembaca minta tolong untuk dibuatkan aplikasi kecil menggunakan Delphi 7 untuk mengirim data menggunakan email. Data diambil dari database MySQL dipindah ke database Microsoft Access lalu dikirim sebagai attachment menggunakan email. Sebelum dikirim, data yang sudah dipindah ke database MS Access terlebih dahulu di compress dengan winrar. Berikut alur program : [...]
Cetak File Teks (Nota Kasir) Langsung Ke Printer Menggunakan Delphi 7
Di program POS versi lama, jika akan mencetak file nota kasir maka saya menggunakan perintah seperti ini : copy struk.txt > prn Cara diatas bisa berjalan lancar jika printer yang digunakan adalah printer Dot Matriks misalnya : LX-300+, LQ-21XX dan sejenisnya. Kendala muncul jika user menggunakan printer USB karena port USB bukan LPT1, perintah diatas [...]
Aplikasi Pengolah DPT (Daftar Pemilih Tetap) Gratis
Aplikasi pengolah data DPT (Daftar Pemilih Tetap) ini saya buat untuk KPU Kabupaten Ketapang, Kalimantan Timur. Aplikasi ini digunakan untuk Pemilihan Bupati di kabupaten tersebut. Fitur-fitur antara lain : Import data dari excel dengan format yang sudah ditentukan Export data ke excel Cetak laporan ke excel dengan format yang sudah ditentukan Software yang digunakan antara [...]
Membuat Serial Number Dan Registrasi Program Menggunakan Component IceKey Pada Delphi 7
Suatu ketika saya ingin membuat proteksi pada program saya sehingga hanya bisa di install di satu komputer saja. Untuk itu saya harus mengambil informasi yang unik dari komputer tersebut. Seperti misalnya : Tanggal Bios, ID CPU dan Serial Number Harddisk atau sejenisnya.
EMS Advanced Excel Report, Component Delphi Untuk Mencetak Report Langsung Ke Excel
Selama ini jika ingin membuat report langsung ke excel, saya menggunakan OLE Object seperti ini : var app_excel: OleVariant; begin app_excel := CreateOleObject(‘excel.application’); app_excel.Workbooks.Open(‘c:\file.xls’); dst… end;
Aplikasi Nama Bayi Gratis
Iseng-iseng buat aplikasi nama bayi karena pengalaman susah banget cari aplikasi semacam ini di internet. Dibuat menggunakan Delphi 7 dengan database Microsoft Access 2003. Databasenya sendiri saya dapat dari internet dengan kurang lebih 50,000 record. Tapi maaf, sepertinya tidak ada nama Indonesia.
Pengganti StrToDate di Delphi
Ada kalanya kita ingin convert string ke tanggal dengan fungsi StrToDate, tapi fungsi ini sangat tergantung pada Regional Setting yang digunakan di Windows. Di bawah ini adalah fungsi DateTimeStrEval berfungsi convert string ke date dengan parameter Format Tanggal. Cara penggunaan : StrDate := ’01-10-2009′; dtDate := DateTimeStrEval(‘dd-mm-yyyy’, StrDate); Berikut fungsi DateTimeStrEval; uses SysUtils, DateUtils function [...]
