| Kamis, 03 Desember 2009 |
| Menghitung Lingkaran |
Buatlah tampilan seperti dibawah ini :
Komponen-komponen yang harus dibuat adalah :
- Label untuk indikator Text Sisi dari Jari-jari Lingkaran. (1)
Properties :
Caption = Jari-Jari
Name = Label1
- Text Editor Untuk memasukan Nilai Jari-Jari Lingkaran. (2)
Properties :
Text = 0 (Nol)
Name = vJari
- Label untuk indikator Text Hasil Perhitungan Luas. (3)
Properties :
Caption = Luas
Name = Label3
- Label untuk indikator Text Hasil Perhitingan Keliling. (4)
Properties :
Caption = Keliling
Name = Label4
- Label untuk Menempatkan Hasil Perhitingan Luas. (5)
Properties :
Caption = (Blank/Kosong)
Name = Luas
- Label untuk Menempatkan Hasil Perhitingan Keliling. (6)
Properties :
Caption = (Blank/Kosong)
Name = Keliling
- Button Untuk Memulai Perhitungan (7)
Properties :
Caption = Mulai Menghitung
Name = Button1
- GroupBox1 Untuk Menempatkan Semua Komponen.
Properties :
Caption = Lingkaran
Name = GroupBox1
- GroupBox2 Untuk Menempatkan Hasil Perhitungan Luas Dan Keliling.
Properties :
Caption = (Blank/Kosong)
Name = GroupBox2
Tambahkan Script dibawah ini Pada Button1 dengan cara meng Double Klik Button1 :
Var
nJari:integer;
nKliling,nLuas:real;
begin
nJari :=StrToInt(vJari.Text);
nKliling:=2*3.14*nJari;
nLuas:=3.14*nJari*njari;
Luas.Caption :=floattostr(nKliling);
Keliling.Caption :=floattostr(nLuas);
end;
 Tampilan Akhir ProgramCatatan : Jika kesulitan dalam membuat Label, Text Editor Dan Button silahkan pelajari cara membuatnya pada Posting saya Sebelumnya.
 |
|
|
|
|
|
|
| about me |
|
Hanya Seorang Lelaki Biasa Yang berusaha menjadi Suami, Ayah dan Anak yang Baik...
|
|
|
| My Lovely Daughter : |
|
|
| Yang Terdahulu : |
|
|
|
|
| Jadwal SHOLAT |
|
|
|
| Buku Tamu : |
|
|
| Jumlah Pengunjung : |
|
|
| Thanks To : |
|
Allah SWT, Muhammad SAW, My Parent, My Amazing Lady (My Wife & My Daughter), All OF my Friend in STMIK YPAT Purwakarta, Focus Komputer (Purwakarta), Bpk. Nanang & Ibu Dince For A Great Teaching, And ALL OF U (The Visiter of My BLOG) .. God Bless U |
|
| My Favorit Links |
|
|
|
| Template by |
|
|
 |
|
|
Posting Komentar