Skip to main content

Posts

Showing posts from 2010

Membuat group pada laporan

Dengan menggunakan komponen TQRGroup Anda dapat mengelompokkan data berdasarkan kondisi tertentu. Misalnya Anda ingin mengelompokkan nama Company dari tabel Customter.db berdasarkan nama Company yang mempunyai huruf awal yang sama. Untuk itu Anda bisa mencoba contoh di bawah ini: Buat sebuah proyek baru dan tambahkan sebuah report. Tambahkan komponen TTable pada report. Ubah property DatabaseName menjadi DBDEMOS, TableName menjadi Customer dan IndexName menjadi ByCompany. Aktifkan tabel dengan mengatur property Active menjadi True. Tambahkan ...

Mengganti RegisteredOwner & Organization

Sebelum Anda meneruskan tutorial Delphi ini, Anda harus memahami seluk beluk registry terlebih dahulu. Silahkan baca sekilas ulasan registry di sini . Tutorial ini akan menjelaskan tentang cara mengganti RegisteredOwner dan RegisteredOrganization pada komputer Anda. RegisteredOwner dan Organization tersebut dapat kita lihat pada Control Panel - System, lalu pada bagian Registerd To. Untuk mengganti RegisteredOwner secara "manual" (melalui registry editor) dapat Anda lihat di sini . Langkah pertama sebelum memanipulasi nil...

Mengetahui path dari aplikasi

Dalam membuat aplikasi, kadang-kadang kita perlu mengetahui path atau letak file *.exe dari suatu program. Bagaimana caranya ? Caranya cukup mudah sekali. Anda hanya cukup menambahkan property ExeName dari kelas TApplication. procedure TForm1.Button1Click(Sender: TObject); begin      Label1.Caption := Application.ExeName; end; Potongan program di atas akan "mencari" letak file *.exe dan menuliskannya pada komponen Label1, jika pemakai mengklik Button1.

Menyembunyikan taskbar

Contoh program di bawah ini akan menunjukkan bagaimana cara untuk menyembunyikan taskbar melalui program yang dibuat dengan Delphi. Untuk menyembunyikan dan menampilkan taskbar kita dapat menggunakan salah satu dari fungsi Windows API yaitu ShowWindow yang deklarasinya sebagai berikut : function ShowWindow (hwnd : HWND; nCmdShow : integer) : Boolean; Parameter pertama dari fungsi ShowWindow merupakan handle window yang akan ditampilkan atau disembunyikan. Parameter kedua adalah bagaimana window tersebut ditampilkan. Yang menjadi pertanyaan kita, darimana ...

Membuat splash screen

Splash screen merupakan tampilan yang kita lihat pertama kali waktu kita menjalankan sebuah aplikasi. Splash screen ini biasanya ditampilkan untuk mengurangi kejenuhan user sewaktu program masih dalam tahap inisialisasi. Untuk membuat splash scren tersebut caranya sebagai berikut : Bikin dulu form utamanya. Tambahkan form yang akan digunakan sebagai splash screen (dari menu File, pilih New Form). Beri nama form tersebut dengan FrmSplash. Tambahkan komponen Timer (terletak pada tab Win32), beri nama dengan tmMainTimer. Tambahkan ...

Warna pada DBGrid sesuai data

Pertanyaan : Bagaimana memberi warna pada DBGrid sesuai dengan data yang telah kita tentukan, misalnya warna biru pada record dengan data Population lebih besar dari 2,5 juta ? Jawaban : Caranya cukup mudah, Anda tinggal menambahkan kode berikut ini pada event OnDrawColumncell dari DBGrid.: procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin      if Table1.FieldByName(' Population ').AsInteger > 25000000      then  ...

Menginstall Komponen baru

Di sini kami akan memberikan contoh cara menginstall komponen baru pada Delphi 3. Sebelumnya download terlebih dahulu komponen IEButton. Adapun caranya adalah sebagai berikut : Setelah Anda mendownload dan mengekstrak file tersebut, maka Anda akan memperoleh empat buah file. Copy keempat file tersebut ke direktory Lib (biasanya C:\Program Files\Borland\Delphi 7\Lib). Jalankan program Delphi Anda. Dari menu Component, pilih Install Component. Pada bagian Unit File Name, klik Browse dan arahkan ke letak file IEBtn.pas (C:\Program Files\Borland\Delphi 7\Lib\IEBtn.pas). Untuk ...

Download Gratis McAfee Antivirus Plus 2010

McAfee Antivirus Plus 2010 merupakan salah satu di antara beberapa software antivirus berbayar yang paling populer. Jika Anda termasuk salah seorang penggemar McAfee kini Anda bisa mendapatkan software tersebut secara gratis untuk lisense 6 bulan. Untuk mendapatkan McAfee Antivirus Plus 2010 secara gratis caranya adalah sebagai berikut: 1. Jadilah fan McAfee pada halaman facebook ini . 2. Klik tombol Get Yours Now. 3. Klik tombol Get Started Now. 4. Lakukan registrasi dengan memasukkan data nama, alamat email dan password Anda.   5. Cek email Anda dan konfirmasi account McAfee Anda dengan mengklik link yang disertakan pada email tersebut. 6. Download McAfee   Tidak disebutkan kapan promosi ini akan berakhir, jadi kalau Anda tertarik dengan McAfeee Antivirus Plus 2010 segera aja manfaatkan kesempatan ini

Download Aplikasi Delphi – Program Perpustakaan

Apa sih fitur program ini? Program ini sebenarnya hanya bagian kecil dari sistem informasi akademik, karena memuat 3 komponen penting. Karyawan perpus (bisa diperluas menjadi karyawan kampus/instansi tertentu yang berhubungan dengan perpusatakaan). Master data buku/katalog buku dalam bentuk digital. Siswa sebagai peminjam. program ini bisa mengelola ketiga2nya lho. Dilengkapi dengan fitur peminjaman dan pengembalian buku, berbagai laporan dan lain lain. kemarin program rental CD yang saya bagikan menggunakan suiskin, yaitu komponen delphi yang berguna mempercantik tampilan program. sementara program perpustakaan ini tidak menggunakan komponen tersebut, jadi bisa dibuka dengan bebas. Fuiih.. lama nggak nulis panjang. Klik disini untuk mendownload file binarinya beserta souce code.

program delphi MP3 Player

Masih sangat sederhana sih, tetapi masih bisa digunakan untuk referensi pemrograman multimedia pada delphi. Program MP3 player yang dibuat dengan delphi ini hanya bisa memilih 1 lagu, tidak memiliki playlist, repeat play dll. Fasilitas utamanya hanya play, pause dan stop. Sebenarnya dulu saya ingin membuat MP3 player yang fasilitasnya hampir sama dengan winamp . Tetapi tidak tahu kenapa proyek tersebut berhenti. Hasilnya ya program seperti ini. Berikut kode untuk membangun aplikasi ini. unit UMain; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, MPlayer, ComCtrls, ExtCtrls; type TForm1 = class(TForm) mp3Player: TMediaPlayer; Edit1: TEdit; Button1: TButton; OpenDialog1: TOpenDialog; Timer1: TTimer; Progress: TProgressBar; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Timer1Timer(Sender: TObject); procedure FormCreate(Sender: TObject); procedure B...

Kumpulan Tutorial Delphi (DElphiDabbler Code Snip)

info lagi teman-teman delphi mania kumpulan source code delphi dari DElphiDabbler Code Snip Download Disini

Cara Setting Kabel LAN

Untuk menghubungkan dua buah komputer atau menghubungkan dua buah HUB/switch dengan kabel UTP, dapat menggunakan kabel crossover. Jika mo menghubungkan komputer ke HUB/switch, gunakan kabel straight. lanjuuut… Dalam pengkabelan straight dan cross, kita bisa lihat standar yang sudah ditetapkan untuk masalah pengkabelan ini, EIA/TIA 568A dan EIA/TIA 568B. Kabel Straight Kabel straight adalah istilah untuk kabel yang menggunakan standar yang sama pada kedua ujung kabel nya, bisa EIA/TIA 568A atau EIA/TIA 568B pada kedua ujung kabel. Sederhananya, urutan warna pada kedua ujung kabel sama. Pada kabel straight, pin 1 di salah satu ujung kabel terhubung ke pin 1 pada ujung lainnya, pin 2 terhubung ke pin 2 di ujung lainnya, dan seterusnya. Jadi, ketika PC mengirim data pada pin 1 dan 2 lewat kabel straight ke switch, switch menerima data pada pin 1 dan 2. Nah, karena pin 1 dan 2 pada switch tidak akan digunakan untuk mengirim data sebagaimana halnya pin 1 dan 2 pada PC, maka swit...

Cara Setting MikroTik sebagai Gateway dan Bandwidth Management

Artikel ini melanjutkan dari artikel sebelumnya mengenai instalasi mikrotik. Dalam artikel ini akan coba dijelaskan mengenai bagaimana mensetting MikroTik sebagai gateway dan bandwidth management dalam sebuah LAN. Sebelum masuk ke proses konfigurasi, agar lebih mudah dipahami berikut saya gambarkan topologi jaringan sebagai contoh kasus yang kemudian akan kita implementasikan dalam bentuk konfigurasi MikroTik. Ini sebagai contoh saja, aslinya anda harus menyesuaikan dengan kondisi jaringan anda sendiri. Dari topologi diatas, ada beberapa hal yang nantinya akan kita lakukan, yaitu : Menentukan IP Address untuk Interface Public dan Local pada Gateway MikroTik, dimana Interface Public akan terkoneksi ke Jaringan Internet sedang Interface Local akan terkoneksi ke Jaringan Local. Menentukan IP Address disetiap Client, sesuaikan seperti pada gambar topologi. Menentukan Routing pada Gateway MikroTik sehingga dirinya sendiri sudah harus bisa terkoneksi ke Internet. Mengaktifkan ...

Instal Router menggunakan Mikrotik RouterOS

MikroTik RouterOS™ adalah sistem operasi dan yang dapat digunakan untuk menjadikan komputer manjadi router network yang handal, mencakup berbagai fitur lengkap untuk network dan wireless. Kemudian di extrack dan kemudian burn ke CD itu file ISO nya. 1. Install Mikrotik OS – Siapkan PC, minimal Pentium I juga gak papa RAM 64,HD 500M atau pake flash memory 64 – Di server / PC kudu ada minimal 2 ethernet, 1 ke arah luar dan 1 lagi ke Network local – Burn Source CD Mikrotik OS masukan ke CDROM – Boot dari CDROM – Ikuti petunjuk yang ada, gunakan syndrom next-next dan default – Install paket2 utama, lebih baiknya semua packet dengan cara menandainya (mark) – Setelah semua paket ditandai maka untuk menginstallnya tekan “I” – Lama Install normalnya ga sampe 15menit, kalo lebih berarti gagal, ulangi ke step awal – Setelah diinstall beres, PC restart akan muncul tampilan login 2. Setting dasar mikrotik Langkah awal dari semua langkah konfigurasi mikrotik adalah setting ip Hal ini bertujuan ag...