Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Daten vom Typ Byte in einer .ini Datei speichern (https://www.delphipraxis.net/29290-daten-vom-typ-byte-einer-ini-datei-speichern.html)

Gambit 7. Sep 2004 10:08


Daten vom Typ Byte in einer .ini Datei speichern
 
Moin,

ich habe hier ein Jedi Komponente zur Eingabe einer IP-Adresse. Die eingegebene Adresse kann ich so in einer .ini Datei speichern:
Delphi-Quellcode:
iniFile:= TiniFile.Create('C:\MyIni.ini');
iniFile.WriteString('IP', 'Adress', JvIpAddress1.Text);
iniFile.Free;
Jetzt möchte ich aber beim Start des Programms die Ip-Adresse auch wieder in das Adressfeld eintragen, die einzelnen Felder der Ip-Adresse werden aber als Byte gespeichert(JvIPAddress1.AddressValues.Value1 usw).

Ich müsste also jedes Feld einzeln in der .ini Datei speichern. Aber wie speichere ich einen Wert vom Typ Byte in der .ini Datei?

Gruß

Gambit

Bowler 7. Sep 2004 10:10

Re: Daten vom Typ Byte in einer .ini Datei speichern
 
Hast Du es schonmal mit ReadInteger und WriteInteger probiert?

Jelly 7. Sep 2004 10:18

Re: Daten vom Typ Byte in einer .ini Datei speichern
 
Zitat:

Zitat von Gambit
Ich müsste also jedes Feld einzeln in der .ini Datei speichern. Aber wie speichere ich einen Wert vom Typ Byte in der .ini Datei?

Ich würd in deinem Fall die TIniFile Klasse erweitern mit Methode WriteIP und ReadIP, und die einen neuen Datentyp definieren:
Delphi-Quellcode:
TIPAddress = record
  Seg1, Seg2, Seg3, Seg4 : byte ;
end ;

Gambit 7. Sep 2004 13:04

Re: Daten vom Typ Byte in einer .ini Datei speichern
 
Jupp, besten Dank!

Gambit

himitsu 7. Sep 2004 13:11

Re: Daten vom Typ Byte in einer .ini Datei speichern
 
Du kannst natürlich auch einfach ReadInteger und WriteInteger verwenden, denn der Wertebereich vom Byte liegt da wohl loker drin.

Also einfach
Delphi-Quellcode:
iniFile.WriteInteger('...', '...', DasByte);

DasByte := iniFile.ReadInteger('...', '...');
{oder, wenn es unbedingt sein muß}
DasByte := Byte(iniFile.ReadInteger('...', '...'));


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:25 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