AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Umkehrfunktion zu ReadSection()

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

Registriert seit: 8. Jun 2009
Ort: Bayern
1.138 Beiträge
 
Delphi 11 Alexandria
 
#1

Umkehrfunktion zu ReadSection()

  Alt 14. Jun 2016, 09:08
ich möchte eine Stringliste in einer Ini Datei Speichern
IniFile.ReadSection() mit Readsection könnte ich alles Lesen, allerdings gibt es hier zu keine Funktion "IniFile. WriteSection" ;
Muss ich hier selber etwas basteln ?
  Mit Zitat antworten Zitat
Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#2

AW: Umkehrfunktion zu ReadSection()

  Alt 14. Jun 2016, 09:16
Mit ReadSection bekommst du aber nur eine vereinfachte Darstellung der Inhalte. Um das wieder zu schreiben musst du hier eine aufwändige Prüfung machen, ob die Struktur der Daten auch wirklich passt.

Was passen könnte wäre eine Instanz von TMemIniFile , die könnte man dann auch wieder gefahrlos zurückschreiben (mit wenig Aufwand).
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.452 Beiträge
 
Delphi 12 Athens
 
#3

AW: Umkehrfunktion zu ReadSection()

  Alt 14. Jun 2016, 09:41
ReadSection gibt dir nur die Names bis zum Gleichheitszeichen, aber nicht die Values aus dem Inifile. Willst du die gesamte Zeile, nimm besser ReadSectionValues . Kommentare gehen dabei aber auch verloren. Nebenbei ist das in TMemInifile aber auch effizienter implementiert.

Du kannst auch nur solche Stringlisten in einem Inifile speichern, deren Zeilen nicht
  • mit einem Semikolon beginnen
  • in eckige Klammern eingeschlossen sind
  • leer sind
  • Leerzeichen um das erste Gleichheitszeichen enthalten
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Bjoerk

Registriert seit: 28. Feb 2011
Ort: Mannheim
1.384 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Umkehrfunktion zu ReadSection()

  Alt 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]);
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:11 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz