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()
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 seiten = 4
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()