Archive for category Delphi

Menambahkan Kata atau Kalimat dalam Lines Memo Delphi

Komponen: 1. Dua Button (Tab Standard) 2. Memo (Tab Standard) Properties: 1. Ubah Caption pada Button1 menjadi “Contoh 1” dan Caption pada Button2 menjadi “Contoh 2“. Desain Form seperti gambar dibawah ini: Masukkan kode program berikut pada Button1: procedure TForm1.Button1Click(Sender: TObject); begin Memo1.Lines.Add(‘Contoh 1’); end; Dan masukkan kode program berikut pada Button2: procedure TForm1.Button2Click(Sender: TObject); begin Memo1.Lines.Add(‘Contoh 2’); end; […]

, , , , , , , ,

Tinggalkan komentar

Memilih dengan RadioButton pada Delphi

Desain Form seperti gambar dibawah ini: Komponen: 1. Label (Tab Standard) 2. Dua RadioButton (Tab Standard) Properties: 1. Ubah Caption pada Label menjadi “Jenis Kelamin“. 2. Ubah Caption pada RadioButton1 menjadi “Laki-laki” dan Caption pada RadioButton2 menjadi “Perempuan“. Kode Program: 1. Masukkan Kode Program berikut pada RadioButton1  procedure TForm1.RadioButton1Click(Sender: TObject); begin ShowMessage(‘Kamu memilih Laki-laki’); end; 2. Masukkan […]

, , , , , , ,

Tinggalkan komentar

SlowMotion Form Saat Tampil pada Delphi

Gunakan satu Timer (Tab System) dan satu Button (Tab Standard) lalu desain Form seperti gambar dibawah ini: Atur Properties pada Form. Ubah AlphaBlend menjadi True dan ubah AlphaBlendValue menjadi “O“. AlphaBlendValue adalah tingkat transparansi Form saat tampil. Ketika di ubah menjadi “O” maka tampilan Form tidak terlihat saat program dijalankan. Setelah itu atur Properties Interval […]

, , , , , , ,

Tinggalkan komentar

ShowMessage Sebagai Pesan pada Delphi

Gunakan 2 Button (Tab Standard) yaitu Button1 dan Button2. Ubah Properties Caption Button1 menjadi “Pesan 1” dan Button2 menjadi “Pesan 2“. Desain Form seperti gambar dibawah ini: Masukkan kode program pada Button1 dengan cara klik 2 kali: procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(‘Isi Pesan disini’); end; Dan masukkan kode program berikut pada Button2: procedure TForm1.Button2Click(Sender: TObject); […]

, , , , , , , ,

Tinggalkan komentar

Tambah dan Hapus Item pada ListBox Delphi

Komponen: 1. Edit (Tab Standard) 2. Button1 dan Button2 (Tab Standard) 3. ListBox (Tab Standard) Properties: 1. Edit1 (Hapus kata Edit1 pada Properties Text) 2. Button1 (Ubah Properties Caption menjadi “Tambahkan“) 3. Button2 (Ubah Properties Caption menjadi “Hapus“) Desain Form seperti gambar berikut: Masukkan kode program berikut pada Button1 (“Tambahkan“): procedure TForm1.Button1Click(Sender: TObject); begin ListBox1.Items.Add(Edit1.Text); […]

, , , , , , , ,

Tinggalkan komentar

ProgressBar pada Delphi

Desain Form seperti gambar dibawah ini, gunakan komponen ProgressBar (Tab Win32) dan Timer (Tab System). Lihat Properties pada ProgressBar, nilai default Properties Max = 100 yaitu panjang maksimal ProgressBar tersebut dan dapat diubah sesuai keinginan. Sedangkan Properties Orientation untuk mengatur ke arah mana ProgressBar berjalan (Horizontal atau Vertical). Kalau di ubah menjadi Vertikal berarti Desain […]

, , , , , , ,

Tinggalkan komentar

Pemanfaatan Satu Button pada Delphi

Penggunaan satu Button atau Tombol pada Delphi tidak hanya digunakan untuk satu perintah, tapi dapat digunakan untuk dua perintah atau lebih. Disini saya akan menggunakan dua perintah pada Button. Desain Form seperti gamar di bawah ini. Gunakan satu Button dan satu Label pada tab Standard. Ubah Caption pada Button menjadi “ON” dan ubah Caption pada Label menjadi […]

, , , , , ,

Tinggalkan komentar