It actually for writing and creating an xml document , thats been parsed by a 
SAX componetn within another environment (progress)'. So using this approach is 
my only solution.

----- Original Message ----
From: Samuel Lujan Navarro <[EMAIL PROTECTED]>
To: [email protected]
Sent: Thursday, January 18, 2007 4:09:54 PM
Subject: RE: [delphi-en] concatination of strings; writing to stream









  


    
            

Hi,



I thing the second option is better, but, I have a dude. You will need to 
extract this  strings, then how do you thing to do that? why you don't use the 
TStringList component?



Sami



Andries Bos <[EMAIL PROTECTED] com> escribió:                                  
I have program where I have to create strings for more than 400,000 times and 
write them to a stream.

 

 as an example the following: 

 

 var

 astring, and bstring,... : string;

 

 passing this to a stream could be done with:

 

 procedure WriteText(const AString: string);

 begin

   FStream.Write( PChar(AString) ^, Length(AString) );

 end;

 

 I have two options to save this to the stream:

 

 1. write the list of strings one by one to the stream.. 

 writestring( astring);

 writestring( '  ');

 writestring( bstring);

 ...

 

 2. concatenatie the strings to one new string and then write the resulting 
string to the stream.

 ( 

 

 lstring := astring + '  ' + bstring + '  ' +cstring etc; 

 

 writetext(lstring) ;

 

 )

 

 At first the second solution seems to be faster (using a stopwatch), but 
mayube there is a drawback.

 

 what is the fastest way to concatenate stings and to pass then to a TStream?

 

 Thanks in advance

 

 ____________ _________ _________ _________ _________ _________ _

 Never Miss an Email

 Stay connected with Yahoo! Mail on your mobile.  Get started!

 http://mobile. yahoo.com/ services? promote=mail

 

 [Non-text portions of this message have been removed]

 

 

     

                       



                

------------ --------- --------- ---



LLama Gratis a cualquier PC del Mundo.

Llamadas a fijos y móviles desde 1 céntimo por minuto.

http://es.voice. yahoo.com



[Non-text portions of this message have been removed]





    
  

    
    




<!--

#ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;
}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;
}
#ygrp-vitnav{
padding-top:10px;
font-family:Verdana;
font-size:77%;
margin:0;
}
#ygrp-vitnav a{
padding:0 1px;
}
#ygrp-actbar{
clear:both;
margin:25px 0;
white-space:nowrap;
color:#666;
text-align:right;
}
#ygrp-actbar .left{
float:left;
white-space:nowrap;
}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;
font-size:77%;
padding:15px 0;
}
#ygrp-ft{
font-family:verdana;
font-size:77%;
border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;
}

#ygrp-vital{
background-color:#e0ecee;
margin-bottom:20px;
padding:2px 0 8px 8px;
}
#ygrp-vital #vithd{
font-size:77%;
font-family:Verdana;
font-weight:bold;
color:#333;
text-transform:uppercase;
}
#ygrp-vital ul{
padding:0;
margin:2px 0;
}
#ygrp-vital ul li{
list-style-type:none;
clear:both;
border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;
color:#ff7900;
float:right;
width:2em;
text-align:right;
padding-right:.5em;
}
#ygrp-vital ul li .cat{
font-weight:bold;
}
#ygrp-vital a {
text-decoration:none;
}

#ygrp-vital a:hover{
text-decoration:underline;
}

#ygrp-sponsor #hd{
color:#999;
font-size:77%;
}
#ygrp-sponsor #ov{
padding:6px 13px;
background-color:#e0ecee;
margin-bottom:20px;
}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;
margin:0;
}
#ygrp-sponsor #ov li{
list-style-type:square;
padding:6px 0;
font-size:77%;
}
#ygrp-sponsor #ov li a{
text-decoration:none;
font-size:130%;
}
#ygrp-sponsor #nc {
background-color:#eee;
margin-bottom:20px;
padding:0 8px;
}
#ygrp-sponsor .ad{
padding:8px 0;
}
#ygrp-sponsor .ad #hd1{
font-family:Arial;
font-weight:bold;
color:#628c2a;
font-size:100%;
line-height:122%;
}
#ygrp-sponsor .ad a{
text-decoration:none;
}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;
}
#ygrp-sponsor .ad p{
margin:0;
}
o {font-size:0;}
.MsoNormal {
margin:0 0 0 0;
}
#ygrp-text tt{
font-size:120%;
}
blockquote{margin:0 0 0 4px;}
.replbq {margin:4;}
-->








 
____________________________________________________________________________________
Never miss an email again!
Yahoo! Toolbar alerts you the instant new Mail arrives.
http://tools.search.yahoo.com/toolbar/features/mail/

[Non-text portions of this message have been removed]

Reply via email to