> Yes, Benoit,
> still even if change the synthax to:
> 
> Public Sub PrintID()
> Dim i As Integer
> Dim tagok As String[]
> samsung = New Printer As "samsung"
> If samsung.Configure() Then Return
> samsung.Count = 1
> samsung.Print
> 
> End
> 
> Public Sub samsung_Begin()
> 
> End
> 
> Public Sub samsung_Draw()
> Dim i As Integer
> Dim tagok As String[]
> tagok = Split(datae[curr], ";")
> For i = 0 To tagok.Count - 1
> Paint.Font = Font["Lucida Sans"]
> Paint.Font.Size = lett[i]
> Paint.DrawText(tagok[i], CFloat(xcor[i]), CFloat(ycor[i]))
> Next
> End
> 
> It prints blank pages only, while the Printer example works O.K.
> I don't understand this at all. I'm wrestling with this since 3 days.
> 

If you send me a project, I will be able to look deeper in your problem!

-- 
Benoît Minisini

------------------------------------------------------------------------------
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