Tampilkan postingan dengan label Tutorial Delphi. Tampilkan semua postingan
Tampilkan postingan dengan label Tutorial Delphi. Tampilkan semua postingan

Minggu, 16 Desember 2012

Langkah Mudah Untuk Membuat Delphi Chart

Sesi kali ini akan membahas bagaimana membuat char pada Delphi. Control Chart terletak pada tab Additional, seperti tersaji pada gambar berikut ini

letak control chart
letak control chart

Latihan

Untuk memudahkan pemahaman akan diberikan Latihan  pemaanfaatan chart. Akan dibuat program yang menyajikan grafik penerimaan mahasiswa baru berdasarkan data inputan yang terdiri dari empat tahun: 2008, 2009, 2010 dan 2011. Contoh keluaran dapat dilihat pada gambar dibawah ini.


Contoh Latihan Penggunaan Chart dalam Delphi
Contoh Latihan Penggunaan Chart dalam Delphi

Desain Form

Desainlah form dengan meletakkan control-control sebagai berikut:
Letakkan 4 Control label, 4 control EditBox, 3 Control Bitbutton (terletak pada tab Additional), control  Chart
Chart Delphi - Desain Form
Chart Delphi - Desain Form

Pengaturan Properti

Obyek/Control Properti Nilai
Form Caption Grafik Penerimaan Mahasiswa Baru
Label1 Caption 2008

Caption 2009

Caption 2010

Caption 2011
BitBtn1 Kind bkOK
BitBtn2 Kind bkCancel
BitBtn2 Kind bkClose
untuk pengaturan properti pada Chart, ikuti langkah berikut:
  • klik kanan control chart.
  • Klik tab Series
  • Klik tombol Add
  • Klik tipe Bar chart
  • Klik Ok
Chart Delphi - Pengaturan properti pada control chart
Chart Delphi - Pengaturan properti pada control chart

Pengkodean

01procedure TForm1.FormCreate(Sender: TObject);
02begin
03  Chart1.Title.Text.Clear;
04  chart1.Title.Text.Add('Grafik Penerimaan Mahasiswa Baru')
05end;
06
07procedure TForm1.BitBtn1Click(Sender: TObject);
08begin
09  Chart1.Series[0].clear;
10  Chart1.Series[0].Add(strtofloat(Edit1.Text),'2008',clred);
11  Chart1.Series[0].Add(strtofloat(Edit2.Text),'2009',clyellow);
12  Chart1.Series[0].Add(strtofloat(Edit3.Text),'2010',clmaroon);
13  Chart1.Series[0].Add(strtofloat(Edit4.Text),'2011',cllime);
14end;
15
16procedure TForm1.BitBtn2Click(Sender: TObject);
17begin
18     Chart1.Series[0].clear;
19     Edit1.Text :='';
20     Edit2.Text :='';
21     Edit3.Text :='';
22     Edit4.Text :='';
23end;
24
25procedure TForm1.BitBtn3Click(Sender: TObject);
26begin
27   Close;
28end;

Penggunaan Control Grid Dan Chart

Buatlah Program menyajikan jumlah mahasiswa aktif masing-masing fakultas disajikan dalam bentuk tabulasi (grid) dan grafik (chart).

Desain Form
Grid dan Chart Delphi - Desain Form
Grid dan Chart Delphi - Desain Form

AutoScroll Pada Palette Delphi

Anda yang sudah familiar dengan Delphi tentunya tidak asing lagi dengan komponen-komponennya yang diletakkan pada palette. Pada Delphi 5 terdapat sekitar 19 palette. Dengan jumlah palette sebanyak itu tentunya Anda akan sering direpotkan dengan menggunakan scroll yang terletak pada kanan atas untuk berpindah dari satu palette ke palette yang lain.
Tapi untunglah Borland menyediakan satu feature yang tidak terdokumentasi yang dapat mempermudah kita untuk berpindah antar palette tersebut. Caranya adalah dengan sedikit otak-atik pada registry. Adapun langkah lengkapnya adalah sebagai berikut:
  1. Dari menu Start, pilih Run.
  2. Ketikkan regedit, klik OK.
  3. Pindah ke key:
    HKEY_CURRENT_USER\Software\Borland\5.0\
  4. Dari sini bikin subkey baru. Caranya klik kanan pada key 5.0. Dari menu yang muncul pilih New – Key. Beri nama sub key baru tersebut dengan Extras.
  5. Pindah ke subkey yang baru saja dibuat (subkey Extras).
  6. Buat sebuah String Value. Caranya klik kanan, pilih New – String Value. Beri nama dengan AutoPaletteScroll. Beri nilai pada AutoPaletteScroll dengan 1.
  7. Buat sebuah String Value lagi dengan nama AutoPaletteSelect dan beri nilai dengan 1.
Jika Anda telah mengubah registry dengan benar maka untuk berpindah antar palette Anda cukup meletakkan cursor mouse di atas judul palette (tanpa harus mengklik judulnya).

Feature Rahasia Pada Delphi 5

1. Menampilkan bentuk font
Secara default, jika kita memilih property Font.Name pada Object Inspector maka yang tampil adalah nama fontnya. Dengan sedikit mengubah registry kita dapat menampilkan nama font beserta bentuk font-nya.
Caranya, tambahkan String Value baru bernama FontNamePropertyDisplayFontNames pada
HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Extras. Isi value data pada FontNamePropertyDisplayFontNames dengan 1.

2. Warna yang berbeda pada Object Inspector
Seperti yang telah kita ketahui, baik pada Properties maupun Events pada Object Inspector terdiri dari 2 kolom. Kolom sebelah kiri adalah untuk Property atau Events sedangkan kolom sebelah kanan adalah “Nilai”-nya. Nah, dengan otak-atik registry lagi kita dapat membuat warna kolom sebelah kanan sesuka hati kita. Caranya, tambahkan String Value baru bernama PropValueColor pada HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Globals. Lalu isi value data-nya dengan, misalnya clNavy, clRed, dsb.
Jika Anda tidak mau susah payah otak-atik registry, silakan copy baris di bawah ini dan simpan dengan nama file berekstensi .reg. Untuk memasukkan ke registry cukup klik 2x pada file tersebut.
Selamat mencoba.
REGEDIT4
[HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Extras]
“AutoPaletteSelect”=”1″
[HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Extras]
“AutoPaletteScroll”=”1″
[HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Extras]
“FontNamePropertyDisplayFontNames”=”1″
[HKEY_CURRENT_USER\Software\Borland\Delphi\5.0\Globals]
“PropValueColor”=”clRed”

Membuat Jam Digital Di Delphi

Pada sesi latihan ini anda akan diperkenalkan dengan control timer yang berfungsi untuk menjalankan suatu baris atau beberapa baris perintah dalam interval secara kontinyu.  Ada 2 Properti Timer yang sering digunakan yaitu:

  • Interval, properti ini digunakan untuk mengatur selang waktu pengeksekusian perintah, nilainya menyatakan dalam ms (milisecond) atau 1/1000 detik. Sebagai contoh, jika properti interval diberi nilai 1000 maka proses eksekusinya setiap detik.
  • Enabled, properti ini berfungsi untuk mengatur apakah perintah dapat dieksekusi atau tidak. Jika bernilai True maka baris perintah akan dieksekusi. Sebaliknya jika properti Enabled ini diberi nilai False maka perintan tidak akan dieksekusi.
Untuk memudahkan pemahaman berikut ini contoh program jam digital menggunakan control Timer. Buatlah form dan letakkan sebuah control timer, label, dan button seperti pada gambar berikut ini.

Cara membuat form login dengan Delphi 7.

Buat teman-teman yang lagi asiiik membuat program khususnya yang berhubungan dengan Sistem Informasi Administrasi untuk sebuah instansi atau perusahaan dengan menggunakan soft Delphi 7 rasanya  kurang  lengkap kalau tidak ada halaman login. (itu menurutku siii).
Untuk keamanan data yang kita miliki dalam sistem, halaman login ini sangat penting untuk sebuah sistem Administrasi yang  kita buat, karena SI sifatnya sangat rahasia. Halaman login yang aku buat ini berisi Nama Pemakai  dan Password.
Buat teman-teman yang lagi belajar atau lagi nyari – nyari tutorial tentang pemrograman Delphi, mungkin postingan ini bisa bermanfaat buat kalian, ya meskipun hanya program sederhana.
Terlebih dahulu kita buka program yang sudah kita buat sebelumnya. Kalau mau buat baru juga boleh.
Sebagai contoh punyaku adalah SI LKP PIKOM

 
Created By HolisgokiLz CORPORATION | CONSULTAN IT dan HACKER INTELEKTUAL | Tehnik Informatika 2009