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

[Johny Provoost]

Error is gone, but still got a empty page.

Johny

Op 16-05-12 20:53, Ru Vuott schreef:
> 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
>>
> ------------------------------------------------------------------------------
> 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
>

-- 



*Vriendelijke Groeten*

*Johny Provoost*

*mailto: johny.provoost at ...27... <mailto:johny.provoost at ...27...>*

*mailto: johny.provoost at ...626... <mailto:johny.provoost at ...626...>*

*Website:* *http://www.johnyprovoost.net* <http://www.johnyprovoost.net/>