Gempa berkekuatan 8,8 pada skala Richter (SR) Richter (SR) Chile tengah, Sabtu (27/2)

mengguncang Gempa berkekuatan 8,8 pada skala Richter (SR) Chile tengah, Sabtu (27/2). Gempa berpotensi menimbulkan tsunami. Badan Geologi Amerika Serikat memperkirakan, tsunami membuat kerusakan dahsyat di sepanjang pesisir pantai di dekat pusat gempa… Klik disini “http://www.metrotvnews.com”

Wellington – Gempa berpotensi tsunami di Chili membuat wilayah di sekitar Pasifik siaga. Selandia Baru dan Hawaii mengeluarkan peringatan tsunami yang dipicu oleh gempa 8,8 SR itu…
Klik disini detiknews…

Membuat Menu Utama dengan NetBeans

Internet TV

Klik baner berikut untuk mendaftarkan blog anda… :
Get cash from your website. Sign up as affiliate.

Watch TV - Live online internet televisionAccess to 4000 live TV stations from your pc. No need of a TV tuner or decoder. 100% legal – no subscription needed.

Watch television channels online anywhere. All you need is our software, your pc, and Internet connection. Thousands of television shows that would cost you big money in the long run with traditional TV providers, now can watch them with no subscription. Watch 4000 TV Stations from Over 80 Countries!

Cartoons, Fashion, News, Discovery, Sport, Movies,
Music, Football, Adult Shows, Weather, Stocks, Educational, and many others channels are available.

You can watch TV to your PC or laptop at any time and anywhere in the world since our service is not affected by
regional terrain or weather.

This webtv software does not contain any spyware or advertise modules. It has safety installation
with NO WORRIES concerning valuable information loss.

WATCH TV NOW. LIMITED TIME OFFER.

Modul 12. Membuat Report dengan Rave + Delphi 7

Materi tentang Rave…. :
Membuat Laporan Rave Master / Detail
Membuat Laporan dengan Rave Per Tanggal dan Per Periode
4checks.com-Free Shipping and Handling on All Personal Checks with code DWF008
Program Aplikasi Perpustakaan dengan Delphi + Ms. Access
Form Cetak Buku Berdasarkan ID Penerbit
Ahmad Rizal Abidin, M.Kom

Karena project Prjpustaka sebelumnya sudah dibuat, pada modul 2. Membuat menu, maka pada kesempatan ini adalah melengkapi frmanggota yaitu dengan cara:
1. Mengaktifkan Delphi 7.0 dengan cara, klik Start, Klik All Program, Klik Borland Delphi 7, Klik Delphi 7.
2. Klik menu File, klik Open Project, tentukan folder tempat anda menyimpan project PRjpustaka, lalu klik prjpustaka dan klik open
3. Klik Menu file, Klik New, klik form, ganti caption pada properties dengan Cetak Data Anggota, dan pada name ketikkan frmcetakanggota.
4. Klik menu View, lalu klik forms dan double klik frmenu, klik file pada frmmenu, klik anggota dan ketikkan :
frmcetakanggota.show;

5. Klik menu View, lalu klik forms dan double klik frmcetakanggota, lengkapi form tersebut seperti gambar berikut :
Gambar 1. Membuat form Cetak Buku Per Penerbit

Catatan :
Form diatas terdiri dari :
Groupbox, Edit1 dan label1
Ado connection, ADoQuery dan Dataset
Button1 untuk cetak dan Button2 untuk Cancel
Untuk membuat laporan kita menggunakan dua komponen pallete RAVE yaitu
RVProject dan RVDataSetConnection

6. Mengkoneksikan database
Klik ADOQuery1 pada Form, klik ConnectionString (…), klik Build, Klik Microsoft Office 12.0 Acces Database Engine OLEDB Provider (untuk office 2007) tetapi kalau menggunakan office XP dapat dipilih Microsoft jet OLEDB 4.0, test connection
Dan klik next, pada data source ketikkan : D:\perpustakaan\perpustakaan.accdb, dan yang terakhir klik test connection. Apabila test connection tampil keterangan tes connection succeeded, maka koneksinya sudah benar, tutup semua windows koneksi dengan cara klik OK. kembali ke frmCetakanggota.
7. Masih pada Adoquery1, klik SQL pada properties, lalu ketikkan :
select * From anggota
Dan Klik Active pada properties ganti false menjadi true.
8. Mengaktifkan DataSource, yaitu dengan cara klik Datasource pada form anggota, lalu klik Dataset pilih Adoquery1
9. Mengkoneksikan RVDataSetConnection dengan dataset, dengan cara klik RVDataSetConnection, pada properties klik Dataset, lalu pilih AdoQuery1
Langkah-langkah membuat laporan dengan menggunakan RAVE Klik Disini… Klik Disinisi… untuk Rave
Setelah selesai membuat Report dengan Rave dilanjutkan dengan
10. Kembali Menu Project Delphi pada form Cetak
11. Klik RVProject1, lalu pada properties klik ProjectFile, Klik tombol titik-titik, pilih file report yang akan ditampilkan (PRJanggota.rav) dan klik OK
12. Selanjutnya adalah Double klik pada tombol Cetak dan ketikkan koding sebagai berikut :

procedure TForm1.Button1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.SQL.Clear;
adoquery1.SQL.add('select * from Penerbit,buku where penerbit.id_penerbit = buku.id_penerbit and  buku.id_penerbit = "'+ edit1.Text +'"');
adoquery1.Open;
if not adoquery1.Eof then
begin
  rvproject1.Execute;
  rvproject1.ExecuteReport('prjbukupenerbit.rav');
end
else
  showmessage('Data tidak ditemukan');
end;

@Ahmad
Selamat MEncOba…

Materi yang berhubungan :
Modul 1. Dasar Pemograman Delphi 7
Modul 2. Alur Program Delphi 7.0
Modul 3. Membuat Database dengan Menggunakan Microsoft Acces 2007
Modul 4. Membuat Menu Pada Delphi 7.0
Modul 5. Membuat Form Penerbit pada Delphi 7.0
Modul 6. Membuat Form Anggota pada Delphi 7.0
Modul 7. Membuat Form Buku pada Delphi 7.0
Modul 8. Membuat Form Transaksi Peminjaman Buku pada Delphi 7.0
Modul 9. Membuat Form Transaksi Pengembalian Buku pada Delphi 7.0 + MS. Access 2007
Modul 10. Membuat Nomor peminjaman secara otomatis pada Form Transaksi Peminjaman Buku pada Delphi 7.0 + MS. Access 2007
Modul 11. Membuat Report dengan Rave
Modul 12. Membuat Report dengan Rave + Delphi 7