AGB  ·  Datenschutz  ·  Impressum  







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

Problem mit Excelexport

Ein Thema von Borschti · begonnen am 18. Jul 2008 · letzter Beitrag vom 24. Jul 2008
Antwort Antwort
Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#1

Re: Problem mit Excelexport

  Alt 24. Jul 2008, 14:21
Hallo Borschti,

CSV ist auch als ASCII-Delimited bekannt, Dazu gibt es auch eine RFC aber die kann ich gerade nicht finden. Ganz knapp formuliert funktioniert das so:

Die Datei ist eine Textdatei.
Für jeden Datensatz gibt es einen Zeile.
Delphi-Quellcode:
Daten+CRLF / Daten +LF { Trenner ist #13#10 oder #10}
Daten=Feld+[Trennzeichen]+Feld+[TrennZeichen]+Feld....... { Trennzeichen kann beliebig definiert werden excl. CR und LF }
Feld=["]+[Bstb]/[Zahl]/[SonderZchn]....+["]
Rein theoretisch ist der Feldbegrenzer " nur notwendig wenn das Trennzeichen im Feld vorkommt. Bei neueren Datenbeständen ist aber praktisch jedes Feld mit Begrenzern versehen.
Falls Du nur numerische Werte übergeben willt ist aber auch so etwas zulässig:
1234,12.4,400 ... usw.
oder
1234;12.4;400 ... usw.
oder
1234;12,4;400 ... usw.

Im Jedi-Projekt soll es übrigens Routinen für die CSV-Verarbeitung geben.

Ausserdem hat Tstrings auch etwas zu bieten:
Zitat:
Die Eigenschaft DelimitedText stellt alle Strings im TStrings-Objekt in einem einzigen String dar.

Delphi-Syntax:

property DelimitedText: string;

C++ Syntax:

__property AnsiString DelimitedText = {read=GetDelimitedText, write=SetDelimitedText};

Beschreibung

DelimitedText bietet die Möglichkeit, alle Strings eines TStrings-Objekts wie einen einzigen String zu behandeln.

Beim Lesen von DelimitedText erhalten Sie einen Wert, in dem die einzelnen Strings auf zwei Arten voneinander getrennt sind: jeder String wird von dem Zeichen eingeschlossen, das in der Eigenschaft QuoteChar angegeben ist. Zwischen den einzelnen Strings steht das Zeichen, das in der Eigenschaft Delimiter angegeben ist.

Wenn Sie DelimitedText einen Wert zuweisen, müssen die einzelnen Strings zwischen dem in QuoteChar festgelegten Zeichen stehen oder mit dem in Delimiter definierten Trennzeichen voneinander getrennt werden. Die beiden Methoden können auch gleichzeitig verwendet werden.

Hinweis: Die Eigenschaft CommaText entspricht der Eigenschaft DelimitedText, wenn als Trennzeichen (Delimiter) ein Komma und als Anführungszeichen (QuoteChar) das Zeichen " verwendet wird.
Soweit mir bekannt ist werden CSV-Dateien automatisch von excel geöffnet.

Das Auslesen aus einer DB geht ungefähr so
Delphi-Quellcode:
  repeat
    for i:=0 to dm_portfolio.mquery1.fields.count-1 do
      dummy:=dummy+trenner+dm_portfolio.mquery1.fields.fields[i].asstring;
    ll.add(dummy);
    dummy:='';
    dm_portfolio.mquery1.next;
  until dm_portfolio.mquery1.eof;
Bitte verwende den Schnipsel nicht ungeprüft, da fehlt die Initialisierung und die Finalisierung von Dummy, da geht's nur ums Prinzip

Gruß
K-H
  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 08:57 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz