- , STRING ( ). (Array[0..N] of char), ( N 255). N STRING(N) , 255. N STRING : 255 .
(), Array[0..N] of char. , 0 (), , ( ).
, , :
Var St:string;
St Ord(St[0]).
, (). , '' ( ). , , "" .
, .
:
Var st1,st2,st3,sts:string;
Begin
...
{ }
st1:='';
st2:='';
st3:='';
{ }
sto:=st1+' '+st2+' '+st3;
{ sto ' '}
End;...
ASCII. :
'abcd' = 'abcd' - True ();
'abc'<'bcd' 'a' 'b' ..
.
Var "" () - . FillChar, :
Var S:string[80];
Begin...
FillChar(S[1],80,' '); { }
S[0]:=Chr(80); { }
...
End;
, Length(S), S - String.
. :
1) STR(X,S) - X S. : X:F:n ( , F - , , n - ) X:F ( ). GRAPH. :
STR(55,s); - s , '55'.
2) VAL(S,,ErrCode) - S , . ErrCode , , , S, . :
|
|
Val('125',K,kod) - , 125, kod=0;
Val(' 1.05',M,code) - M=1.05, code=0;
Val('100, ',N,code) - , .. 4- ',' code=4, N .
, 5 :
1) Concat (S1,S2,,Sn) -, S1,S2,,Sn. : Ssum:=Concat(s1,s2,s3).
2) Copy (S,Start,L) - , L, Start S. : Stcop:=Copy('TTTx1+++',4,2) - Stcop='x1'.
3) Delete (S,Start,L) - , S L, Start S.
4) Insert (S,Subs,Start) - , Subs S Start S. :
S:=' ';
Insert(S,' ',9);
S : ' ';
5) Pos(Subs,S) - Subs S;
() Subs S, , 0, .