Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi "Felder" von TXT in Stringgrid lesen (https://www.delphipraxis.net/100256-felder-von-txt-stringgrid-lesen.html)

Overclocker 25. Sep 2007 11:04


"Felder" von TXT in Stringgrid lesen
 
Hi zusammen,

ich habe folgende Frage:

Wie realisiere ich, dass ich von einer TXT Datei, die in bestimmten Abständen informationen enthält, die Inhalte in einzelne StringGrid Zellen importieren kann.

Das heißt, ich möchte das z.B. IMMER der Inhalt in der 1. Zeile an der Stelle 50 mit der Länge 5 (also ein Wort/Zahl mit 5 Zeichen also) in die stringgrid1.cells [2,2] geschrieben wird.

Ich habe schon versucht den Text in ein memo feld / listbox zu importieren doch ich komm einfach nicht darauf, wie ich die einzelnen Positionen herauslesen kann.
Mit einem FindDialog hilft es mir nichts nach den Wörtern/zahlen zu suchen, da sie immer unterschiedlich sind.
Mir geht es wirklich nur um die Bereich und im WWW bin ich noch nicht fündig geworden.

Jemand von euch ne Idee?

Gruß

pstruh 25. Sep 2007 11:27

Re: "Felder" von TXT in Stringgrid lesen
 
Also, wenn ich das richtig verstehe?!
1. Einlesen der TXT-Datei zeilenweise in einen String,
z.B. readln(f,Zeile)
2. Übergabe an die Zelle des StringGrids,
z.B. StringGrid1.Cells[Col,Row]:=copy(Zeile,50,5) // ab Position 50, 5 Zeichen lang

mkinzler 25. Sep 2007 12:06

Re: "Felder" von TXT in Stringgrid lesen
 
Alternativ kann statt Text und readln() auch eine Stringliste verwendet werden.

Overclocker 25. Sep 2007 16:20

Re: "Felder" von TXT in Stringgrid lesen
 
das mit stringliste hab ich auch schon des öfteren in einem ähnlichen zusammenhang gefunden, doch leiber habe ich damit noch nie gearbeitet und kann mir deswegen auch nichts daraus ableiten.

ich probiers mal mit pstruhs vorschlag :)

danke schonmal


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