Re: [Gambas-user] Paginate doesn't clear page

2012-12-05 Thread Rolf-Werner Eilert
Am 05.12.2012 12:51, schrieb Benoît Minisini: > Le 03/12/2012 15:46, Rolf-Werner Eilert a écrit : >> Hi, >> >> With a little bit of testing code, I tried to find out how Paginate works. >> >> Public Sub drucker_Paginate() >> >> Paint.DrawText("Hallo " & CStr(drucker.Page), 300 + (seiten * 10

Re: [Gambas-user] Paginate doesn't clear page

2012-12-05 Thread Benoît Minisini
Le 03/12/2012 15:46, Rolf-Werner Eilert a écrit : > Hi, > > With a little bit of testing code, I tried to find out how Paginate works. > > Public Sub drucker_Paginate() > > Paint.DrawText("Hallo " & CStr(drucker.Page), 300 + (seiten * 100), > 300 + (seiten * 100)) > > Inc seiten > > If

[Gambas-user] Paginate doesn't clear page

2012-12-05 Thread Rolf-Werner Eilert
Hi, -- I sent this mail on Monday, but it seems that the mailing list has been sleeping since then. So, I send it again and hope it is received by you. Sorry if double-quoted... -- With a little bit of testing code, I tried to find out how Paginate works. Public Sub drucker_Paginate() P

[Gambas-user] Paginate doesn't clear page

2012-12-03 Thread Rolf-Werner Eilert
Hi, With a little bit of testing code, I tried to find out how Paginate works. Public Sub drucker_Paginate() Paint.DrawText("Hallo " & CStr(drucker.Page), 300 + (seiten * 100), 300 + (seiten * 100)) Inc seiten If seiten = 4 Then drucker.Count = 3 End Public Sub drucker_Draw()