These days i am learning Printer class and i have some questions about
it.

For the beginning i print a blank page and some status messages in a
textarea.

the code is this
-----------------
Public Sub btnPrint_Click()

  If prtPrinter.Configure() Then Return

  Me.Enabled = False
  Inc Application.Busy
  prtPrinter.Print
  Dec Application.Busy
  Me.Enabled = True

End

Public Sub prtPrinter_Begin()
  
  prtPrinter.Count = 1
  txtArea.Text &= "Set number of pages to 1\n"
  txtArea.Text &= "Begin printing\n"
  
End

Public Sub prtPrinter_Paginate()
  
  txtArea.Text &= "Begin paginate\n"  
  
End

Public Sub prtPrinter_Draw()


  txtArea.Text &= "Begin Draw\n"
  
End

Public Sub prtPrinter_End()
  
  txtArea.Text &= "End printing\n"  
  
End
--------------

The question is why the prtPrinter_End event is not gining the status
message?

In TextArea i get only

Set number of pages to 1
Begin printing
Begin paginate
Begin Draw
 


-- 
Regards,
Demosthenes Koptsis.


------------------------------------------------------------------------------
All of the data generated in your IT infrastructure is seriously valuable.
Why? It contains a definitive record of application performance, security 
threats, fraudulent activity, and more. Splunk takes this data and makes 
sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-d2d-c2
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to