[Gambas-user] R: Can't print in Gambas 3

[Ru Vuott]

Public Sub Button1_Click()
      If mijnprinter.Configure() = True Then Return
      mijnprinter.FirstPage = 0
      mijnprinter.Orientation = 1
      mijnprinter.Paper = 2
      mijnprinter.Print
End

Public Sub mijnprinter_Draw()

     Paint.DrawText("TEST TEST")
     Paint.End

End




--- Mer 16/5/12, Johny Provoost <johny.provoost at ...27...> ha scritto:

> Da: Johny Provoost <johny.provoost at ...27...>
> Oggetto: [Gambas-user] Can't print in Gambas 3
> A: "Gambas User List" <gambas-user at lists.sourceforge.net>
> Data: Mercoledì 16 maggio 2012, 18:08
> Dear,
> 
> What's wrong with this code.  I want to set someting to
> the printer but 
> the only thing I get is an empty page.
> I can configure my printer but I get an error on the line 
> 'Paint.Begin(mijnprinter)' -> 'printer is not printing'
> and the printer 
> is giving me an empty page.
> 
> 
> Working with Gambas 3.1.90
> Ubuntu 12.04
> Components: gb, gb.from, gb.image, gb.qt4, gb.qt4.ext
> 
> tried with gtk and got the same result.
> 
> ---------------------------------------------------------------------------
> ' Gambas class file
> 
> Public mijnprinter As New Printer
> ----------------------------------------------------------------------
> Public Sub Form_Open()
> 
> End
> ----------------------------------------------------------------------
> Public Sub Button1_Click()
>      If mijnprinter.Configure() = True
> Then Return
>      mijnprinter.FirstPage = 0
>      mijnprinter.Orientation = 1
>      mijnprinter.Paper = 2
>      mijnprinter.Print
>      Paint.Begin(mijnprinter)
>      Paint.Text("TEST TEST")
>      Paint.End
> 
> End
> ---------------------------------------------------------------------
> 
> Greetings,
> Johny Provoost
> 
> ------------------------------------------------------------------------------
> Live Security Virtual Conference
> Exclusive live event will cover all the ways today's
> security and 
> threat landscape has changed and how IT managers can
> respond. Discussions 
> will include endpoint security, mobile security and the
> latest in malware 
> threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>