From: floris@weer.nl   
      
   seems to be a little bit faster but not much... the number of I/O writes are   
   drastically lower though   
      
   Floris   
      
   "Marco van de Voort"  schreef in bericht   
   news:slrnd841uq.190i.marcov@turtle.stack.nl...   
   > On 2005-05-11, Floris  wrote:   
   >>   
   >> I'm using freepascal to write text files, but it writes really slow.   
   >> It looks something like this and it writes with about 300 KB per second:   
   >   
   > var b : array [0..16383] of byte;   
   >   
   >   
   >   
   >   
   >> for i:=1 to 1000 do begin   
   >>   outfilename:='myname' + integertostring(i) +'.txt';   
   >>   Assign (outfile,outfilename);   
   >>   rewrite(outfile);   
   >   
   > settextbuf(outfile,buf);   
   >   
      
      
   ------------ And now a word from our sponsor ------------------   
   Want to have instant messaging, and chat rooms, and discussion   
   groups for your local users or business, you need dbabble!   
   --  See http://netwinsite.com/sponsor/sponsor_dbabble.htm  ----   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)