> 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