Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
Delphi 10.4 Sydney
|
AW: Umkehrfunktion zu ReadSection()
14. Jun 2016, 10:28
Was du machen könntest, wäre mit WriteString Stringlist.Text speichern.Da würde ich allerdings vorher die LineBreaks durch ein anderes Zeichen ersetzen und beim Lesen wieder zurück.
Delphi-Quellcode:
const
cLineBreak = #124;
..
S := StringReplace(SL.Text, sLineBreak, cLineBreak, [rfReplaceAll]);
Ini.WriteString(‘Section’, ‘Ident’, S);
..
S := Ini.ReadString(‘Section’, ‘Ident’, ‘’);
SL.Text := StringReplace(S, cLineBreak, sLineBreak, [rfReplaceAll]);
|
|
Zitat
|