Cara Supaya Cetak Printer Sesuai Dengan (Nama) Driver Printer Yang Dipilih Dari ComboBox ~Report Manual Gambas

Seteleah mempelajari cara memasukkan nama driver printer pada ComboBox (di artikel “http://sandi.bloger.id/cara-menampilkan-memasukkan-daftar-nama-driver-printer-pada-combobox-untuk-report-manual-gambas.xhtml”), sekarang bagaimana supaya cetak ke printernya sesuai dengan nama (driver) printer yang dipilih pada ComboBox.

Pelajari Contoh Berikut.

Buat project dengan Form yang terdiri dari 3 object: ReportView, ComboBox, dan Button.

Open Code:

' Gambas class file

Private Report1 As New Report

Private Printer1 As New Printer

Private ReportTextLabel1 As ReportTextLabel

Public Sub Form_Open()

   ComboBox1.List = Printer.List

   ‘Nama Driver Printer default

   ComboBox1.Text = Printer1.Name

   Button1.Text = "Cetak"

   ReportTextLabel1 = New ReportTextLabel(Report1)

   ReportTextLabel1.Text = "Tes Cetak"

   ReportView1.Report = Report1

End

Public Sub ComboBox1_Click()

   ‘Nama Driver Printer disesuaikan dengan pilihan di ComboBox

   Printer1.Name = ComboBox1.Text

End

Public Sub Button1_Click()

   Report1.Print(Printer1)

End