[Gambas-user] Please help me!

[Benoît Minisini]

> 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