Loading halaman Tutorial Visual Basic, Delphi, PHP - Calon Programer : PEMBUATAN MENU UTAMA DAN REPORT (DELPHI) ...



Metari Menu da pembuatan Report di lab saya bahas disini deh buat baca dan nambah ilmu para pengunjung blog ini.. ..
Silahkan disimak ajah untuk langkah-langkahnya :
Ø Tambahkan 1 Form untuk pembuatan menu utama
clip_image002
Ø Tambahkan 4table(BDE), 4RvDataSetConnection(Rave), RvProject(Rave), Menu(aadtional)
Ø Double Click Menu
clip_image004
Ø Koneksikan Table dan RVDataSetConnection
Obejct Properties
Table 1 DatabaseName : Alias (penjualan_nim)
Table Name : buku
Active : true
Name : tb_buku
Table 2 DatabaseName : Alias (penjualan_nim)
Table Name : pelanggan
Active : true
Name : tb_pelanggan
Table 3 DatabaseName : Alias (penjualan_nim)
Table Name : trans
Active : true
Name : tb_trans
Table 4 DatabaseName : Alias (penjualan_nim)
Table Name : detail
Active : true
Name : tb_detail
RvDataSetConnection 1 Dataset : tb_buku
RvDataSetConnection 2 Dataset : tb_pelanggan
RvDataSetConnection 3 Dataset : tb_trans
RvDataSetConnection 4 Dataset : tb_detail
Ø Double Click RvProject
clip_image006
Ø Pilih File-New Data Object
clip_image008
Ø Pilih Direct Data View-Next
clip_image010
Ø Pilih RvDataSetConnection – Finish
Ø Pilih Tools-Report Wizard-Simple Table
clip_image012
Ø Pilih Next
clip_image014
Ø Ceklist Field- Next
clip_image016
Ø PIlih Next
clip_image018
Ø Pilih Next
clip_image020
Ø Pilih Generate
clip_image022
Ø Simpan dengan Nama: Laporan
procedure TForm5.BukuClick(Sender: TObject);
begin
Form1.Show;
end;
procedure TForm5.PelangganClick(Sender: TObject);
begin
Form2.Show;
end;
procedure TForm5.Exit1Click(Sender: TObject);
begin
if (Application.MessageBox('Anda Mau Keluar dari Program?','Pesan',MB_OKCANCEL+32)=idok) then
Application.Terminate;
end;
procedure TForm5.transaksiClick(Sender: TObject);
begin
Form3.Show;
end;
procedure TForm5.LaporanBukuClick(Sender: TObject);
begin
RvProject1.ExecuteReport('laporan_buku.rav');
end;
procedure TForm5.LaporanPelangganClick(Sender: TObject);
begin
RvProject1.ExecuteReport('laporan_pelanggan.rav');
end;
procedure TForm5.LaporanJualClick(Sender: TObject);
begin
RvProject1.ExecuteReport('laporan_jual.rav');
end;
procedure TForm5.LaporanDetailClick(Sender: TObject);
begin
RvProject1.ExecuteReport('laporan_detail.rav');
end;

end.
Cukup segitu ajah langkah-langkahnya,Untuk download tutornya bisa klik gambar di bawah
Download



2 Reply :

  1. sob ane tanya nih, klo misalnya buat laporan tp dari 2 tabel gimana yah?? kitakan bisa ngetik pake SQL JOIN cumana caranya gimana biar kita bisa nulis sintak SQL di RAVE

    mohon balasannya yah, penting buat tugas senin besok . .

    BalasHapus
  2. itu harus di buat relasinya dulu di Rave Reportnya,untuk listingan memang harus SQL,saya belum buat artikel ttg itu.nanti ditunggu ajah lagi ...

    BalasHapus

Jika ada pertanyaan atau request,Komentar pada tab blogger akan lebih memudahkan saya untuk membalasnya karena lebih mudah melakukan pengecekan komentar.