home bbs files messages ]

Forums before death by AOL, social media and spammers... "We can't have nice things"

   comp.lang.pascal.borland      Borland Pascal was actually pretty neat      2,978 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 1,368 of 2,978   
   Brian to Marco van de Voort   
   Re: Tabs in WinCrt   
   10 Feb 05 13:41:28   
   
   From: brian@beepbeep.invalid   
      
   On Thu, 10 Feb 2005 09:35:59 +0000, Marco van de Voort wrote:   
      
   > 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?');   
   >   
   Hmm well, possibly... (equally untested! ;)   
   But I think the OP might just as well drop the use of Crt unless he has a   
   definite case for using it - and going by what's been said so far, I doubt   
   he does.   
      
   B.   
   --   
   Famous last words #64: Socrates - "I drank what?"   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca