Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi .csv Datei einlesen (https://www.delphipraxis.net/123693-csv-datei-einlesen.html)

MrMyagi 6. Nov 2008 18:26


.csv Datei einlesen
 
Moin allerseits,
und zwar möchte ich nen Programm schreiben, welches aus einer .csv-Datei
Werte ausliest und diese in 3 Memo-Felder wieder ausgibt.
In einem Memofeld sollen dann zb alle Namen, in dem anderen alle
Nachnamen und in dem letzten die jeweiligen Geburtstage reinkommen.
.csv Datei Bsp:
Paul;Stein;1985
Jesus;Christus;0

usw usw
und dann soll halt in dem ersten Memo-Feld
Paul und Jesus stehen, im 2. Stein und Christus und im 3. 1985 und 0.

Wisst ihr wie man soetwas am ebsten realisieren kann??
Hab schon Suche etc benutzt jedoch bin ich aus den Sachen da
nicht richtig schlau geworden :roll:



mfg, Nico

mkinzler 6. Nov 2008 18:28

Re: .csv Datei einlesen
 
Mit Hilfe einer StringListe und entsprechenden Delimiter, Pos/PosEx oder einem CSV-DataSet

MrMyagi 6. Nov 2008 18:29

Re: .csv Datei einlesen
 
Danke erstmal für die schnelle Antwort :thumb:

Hat vllt einer von Euch nen Code-Bsp?
wär dann glaub ich für mich verstöndlicher :stupid:

mkinzler 6. Nov 2008 18:42

Re: .csv Datei einlesen
 
Delphi-Quellcode:
var
  sl, sl2: TStrings;
  i: integer;
begin
  sl := TStringList.Create;
  sl2 := TStringList.Create;
  sl2.Delimiter := ';';
  sl2.StrictDelimiter := True;
  sl.LoadFromFile( 'bsp.csv');
  for i := 0 to sl.Count - 1 do
  begin
    sl2.DelimitedText := sl[i];
    s1 := sl2[0] //1.Spalte
    ...
  end;

MrMyagi 6. Nov 2008 18:51

Re: .csv Datei einlesen
 
Danke erstmal für das Bespiel^^

sl2.StrictDelimiter
-->undefinierter Bezeicher??

mkinzler 6. Nov 2008 18:53

Re: .csv Datei einlesen
 
Das gab es wohl bei D7 noch nicht. Sorgt dafür das Leerzeichen nicht als zusätzlichen Trenner erkannt werden

MrMyagi 6. Nov 2008 18:55

Re: .csv Datei einlesen
 
Achso^^
Gabs nicht sowieso bei den früheren Delphi Versionen sonen
Bug in der Richtung?

alzaimar 6. Nov 2008 19:05

Re: .csv Datei einlesen
 
Das Problem bei der hier vorgestellten Lösung sind Strings, die in '"' eingeschlossen sind, weil dort vorkommende ';' als Trennzeichen interpretiert werden.

Nimm doch einfach eine fertige Klasse, die das macht klick!

MrMyagi 6. Nov 2008 19:16

Re: .csv Datei einlesen
 
Danke erstmal für den Link, habe die Datei gleich runtergeladen.
Wie kann ich jetzt allerdings diese .pas Datei in meinem Programm verwenden
bzw in welchen Delphi Ordner muss ich die kopieren damit ich die benutzen kann?

mkinzler 6. Nov 2008 19:19

Re: .csv Datei einlesen
 
Irgendwo im Such-/Bibliothekspfad und die Unit dann in die Uses mit aufnehmen


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