840_____________________________________________ 14

AnsiString S, Delimiters;

Delimiters = "'";

forfint i = 1; i <= StrLen(S.c_str()); i++)
if(Is Delimiter(Delimiters,S,i))
S[i] = "";

   S       .

     Delimiters      -
.       . ,  -
    :

AnsiString S, Delimiters;

Delimiters = "123456789";

forfint i = 1; i <= StrLen(S.c_str()); i++)
if(Is Delimiter(Delimiters,S,i))
S[i] -= 1;

     ,  0,    1.

 StringReplace   S    OldPattern 
NewPattern.   Flags    rfReplaceAll,   -
     OldPattern.   Flags 
 rflgnoreCase,      . , 

SI = StringReplace(S, OldPattern, NewPattern,

TReplaceFlags  rfReplaceAll) ;

   S1   S       OldPattern 
NewPattern.

 WrapText    Line  .   -
    ,   BreakStr. -
 MaxCol      .  
   BreakStr    ,  
 BreakChars.        
,        MaxCol.  
   BreakChars  ,    
MaxCol. , 

TSysCharSet bchars;

bchars  ' '  '.'  ','  ';'  '+'  '-';

AnsiString S, SI;

SI = WrapText(S, "\n\r", bchars, 10);

   S1  S,      10 ,
       .   S -
 :      ,     
+  .,    :

"  "
" "
" "
" ,"
"  "

" "
"-  "
" +"
"  - . "

 ,     11 ,  ,
..    .

,          
   .       -
  .