Re: [fpc-pascal] Improve TStringList.Text setter?

2022-05-05 Thread Michael Van Canneyt via fpc-pascal
On Thu, 5 May 2022, Alexey Torgashin via fpc-pascal wrote: (I posted to the forum, but it's better to post here.) TStringList.Text setter does this Procedure TStrings.DoSetTextStr(const Value: string; DoClear : Boolean); ... if FLineBreak=sLineBreak then begin Wh

[fpc-pascal] Improve TStringList.Text setter?

2022-05-05 Thread Alexey Torgashin via fpc-pascal
(I posted to the forum, but it's better to post here.) TStringList.Text setter does this Procedure TStrings.DoSetTextStr(const Value: string; DoClear : Boolean); ... if FLineBreak=sLineBreak then begin While GetNextLine (Value,S,P) do Add(S)