Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   "Startadresse" einer Stringliste ändern (https://www.delphipraxis.net/202387-startadresse-einer-stringliste-aendern.html)

DonPedroFo 29. Okt 2019 09:44

Delphi-Version: 5

"Startadresse" einer Stringliste ändern
 
Hallo,

ich steh auf dem Schlauch und weis nicht mal wie ich es in der suche richtig formulieren könnte.

Ich habe einen DatenCode mit verschiedenen Adressen in eine Stringliste eingelesen.

Sieht z.b. folgendermaßen aus.

8000 00000001
8002 00000002
8004 00000003
8006 00000004
....

die ersten 4 "Ziffern" sind die Adresse der Daten die letzen 8 "Ziffern" sind die Daten.

Jetzt will ich die Stringliste so bearbeiten das ich anhand der Adresse die Daten suchen kann.

Mein Problem bei der Sache ist, das die Adresse bei 8000 (Hex) anfängt und nicht bei "0000"
Und in zweier schritten hochgezählt wird.


Ziel des ganzen sollte sein,

dass ich einen Offset (in diesem Fall von 8000 (Hex)) habe, in dem ich dann die Daten Zeile für Zeile in ein Programm einlesen kann.

Und umgekehrt, dass ich anhand der Adresse 8001 sehen kann welche Daten in dem Programm stehen.

hoika 29. Okt 2019 09:52

AW: "Startadresse" einer Stringliste ändern
 
Hallo,
das beisst sich jetzt aber:

Adresse bei 8000 (Hex) anfängt
zweier schritten
Und umgekehrt, dass ich anhand der Adresse 8001

Wie kann da eine 8001 vorkommen.


Aber zum Problem.
Wenn die Adressen eindeutig sind, kannst Du StringList als Name/Value benutzen
gespeichert wird dann so:

8000=00000001
8002=00000002
8004=00000003
8006=00000004

Schau einfach in der Hilfe zur StringList nach, wie du dann suchen kannst

StringList.Values['8000'] -> ergibt 00000001

p80286 29. Okt 2019 10:59

AW: "Startadresse" einer Stringliste ändern
 
Die Stringliste fängt am ersten Datensatz an und endet am letzten. das ist unabhängig vom Inhalt.
Ist diese Liste Sortiert, ist der erste Datensatz der kleinste und der letzte der größte. Wenn Du einen Datensatz suchst der mit "8001...." beginnt, dann ist beim 2. Satz klar, daß es ihn nicht gibt.

Gruß
K-H

Moombas 29. Okt 2019 12:10

AW: "Startadresse" einer Stringliste ändern
 
Warum so kompliziert?

Stehen nur deine Adressen und Daten in der Datei?
Kannst du die Daten wie hoika schreib xxxx=xxxxxx formatieren?
Wenn ja, Datei einlesen (z.B. in eine Stringlist).
In der Stringlist dann Zeile für Zeile durchgehen und dort
- Den String zerteilen ('=' ist der delimiter)
- Erster Teil ist somit deine Adresse und der Zweite Teil die Daten.
Dann kann dir egal sein wo die Startadresse ist und was für Steps gemacht werden.
Oder falls du Adressbezogen suchen willst so, wie hoika es schrieb mit StringList.Values['xxxx']

Rolf Frei 29. Okt 2019 13:26

AW: "Startadresse" einer Stringliste ändern
 
Zitat:

Zitat von Moombas (Beitrag 1450417)
Warum so kompliziert?

Stehen nur deine Adressen und Daten in der Datei?
Kannst du die Daten wie hoika schreib xxxx=xxxxxx formatieren?
Wenn ja, Datei einlesen (z.B. in eine Stringlist).
In der Stringlist dann Zeile für Zeile durchgehen und dort
- Den String zerteilen ('=' ist der delimiter)
- Erster Teil ist somit deine Adresse und der Zweite Teil die Daten.
Dann kann dir egal sein wo die Startadresse ist und was für Steps gemacht werden.
Oder falls du Adressbezogen suchen willst so, wie hoika es schrieb mit StringList.Values['xxxx']

Du bist lustig. :-D Du schreibtst "Wieso so kompliziert" und postest dann einen Ablauf, der genau das ist. Diese Funktionalität ist im TStringList bereits verbaut. Also warum so kompliziert und die Werte selber auftrennen?

Suchen nach Daten mit der Adresse:
Delphi-Quellcode:
StrList.Values['8000'] // Liefert dir "00000001"
Die Reihenfolge der Daten spielt hier keine Rolle. Die Liste muss also NICHT zuvor sortiert werden.

Hiermit speicherst du einen Datensatz. Dabei wird ein neuer Eintrag eingefügt, wenn der Key "8080" noch nicht besteht, ansonsten wird der passende Value einfach aktualisiert:
Delphi-Quellcode:
StrList.Values['8080'] := '00004001'; // Die Stringliste enthält nun den neuen Eintrag "8080=00004001"


Wenn der Value/Name Separator nicht auf "=" geändert werden kann, so hat die StringList ein Property "NameValueSeparator". Diese kann man dann auf ' ' setzen, also:
Delphi-Quellcode:
StrList.NameValueSeparator := #32;
Damit sollte das dann auch mit dem Leerschlag funktionieren. (ungetestet)

Moombas 29. Okt 2019 13:29

AW: "Startadresse" einer Stringliste ändern
 
Zitat:

Zitat von Rolf Frei (Beitrag 1450422)
Du bist lustig. :-D

Danke :P

Ich wollte ihm nur auch noch aufzeigen, das falls er einfach "nur" die Daten der Reihe nach verarbeiten will, OHNE die Adresse vorher zu kennen, das dies auch möglich ist.

Das der Weg mit der vorher bekannten Adresse der schönere und kürzere ist, ist klar^^


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