Umkehrfunktion zu ReadSection()

Thema durchsuchen

Ansicht

Themen-Optionen

Umkehrfunktion zu ReadSection()

Ein Thema von bernhard_LA · begonnen am 14. Jun 2016 · letzter Beitrag vom 14. Jun 2016

Vorheriger Beitrag

Nächster Beitrag

Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge

Delphi 10.4 Sydney

AW: Umkehrfunktion zu ReadSection()

14. Jun 2016, 09: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.

zusammenfalten · markieren

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]);