From: marcov@stack.nl   
      
   On 2005-02-09, Brian  wrote:   
   > On Tue, 08 Feb 2005 21:00:29 +0000, Mike Dickson wrote:   
   >> and using   
   >>   
   >>    Write('Hello World!',CrtTab,"How are you?");   
   >>   
   >> instead?   
   >>   
   > Because you'll get a fixed block of 8 spaces which won't behave the same   
   > as tab - even though that may sometimes display as 8 spaces.   
      
   (untested brain experiment. This is kind of dangerous. Implementations   
   that calculate the whole string instead of per item will fail)   
      
   {$ifndef FPC}   
   const screenwidth=80;   
   {$endif}   
      
   function crttab:string;   
      
   var x,y: integer;   
      
   begin   
    x:=(wherex+8) and not 7;  y:=wherey;   
    if x>screenwidth then   
     begin   
      dec(x,screenwidth); inc(y);   
    end;   
    gotoxy(x,y);   
   end;   
      
   write('Hello World!',crttab,'How are you?');   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)