posted at Fri, 11 Oct 2002 04:35:41 :-
Quote:
>> As I can get that it always prints in the same place.
>> Like the comand "gotoxy(x,y)" for the screen, but I want for the paper.
> If I understand your request, the best you can do is use the printer's
>c/r (carriage return), backspace, tab, or writes of spaces to reprint
>over the same physical line of paper. There is no way to "move around"
>the printer's paper/sheet, though...
Actually, there is, in effect.
Declare var A : array [1..60] of string [80]; fill it with characters
including overwriting with Move; then, when ready, print each line and
move to a new page.
It may be wise to fill the strings with spaces at the start of each
page.
FillChar(A, SizeOf(A), #32);
for K := Low(A) to High(A) do A[K][0] := #80 ;
may be quickest for that.
Since Borland have not provided WriteS(S, ,,,,,) where S is the
destination string, Str() will need to be used to output numbers, etc.
--
<URL:http://www.merlyn.demon.co.uk/> TP/BP/Delphi/&c., FAQqy topics & links;
<URL:http://www.merlyn.demon.co.uk/clpb-faq.txt> Pedt Scragg: c.l.p.b. mFAQ;
<URL:ftp://garbo.uwasa.fi/pc/link/tsfaqp.zip> Timo Salmi's Turbo Pascal FAQ.