Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Comma-Separated-String: Schnelles Zerlegen? (https://www.delphipraxis.net/26280-comma-separated-string-schnelles-zerlegen.html)

wolfram 21. Jul 2004 13:04


Comma-Separated-String: Schnelles Zerlegen?
 
Hallo,
Ich moechte einen Comma-Separated-String jeweils so zerlegen, dass ich alle einzelnen Strings erhalte. Welche Funktion ist die beste?
Gruß Wolfram

BSP:

CSS: Name;STR;PLZ;ORT;

RESULT:
Name
STR
PLZ
ORT

Tortus 21. Jul 2004 13:07

Re: Comma-Separated-String: Schnelles Zerlegen?
 
Ich würd ma glatt sagen ExplodeExplode ist das was du suchst, genaugesagt Das hier

Bitworm 21. Jul 2004 13:10

Re: Comma-Separated-String: Schnelles Zerlegen?
 
StrToStrings aus der Jedi Code Library:

'Converts a string into a list of strings using the specified separator character.

procedure StrToStrings(S: AnsiString; Sep: AnsiString; const List: TStrings; const AllowEmptyString: Boolean = False);'

memphis 21. Jul 2004 13:12

Re: Comma-Separated-String: Schnelles Zerlegen?
 
oder du benutzt folgende Prozedur:

Delphi-Quellcode:
procedure Explode(var a: array of string; Border, S: string);
var
  S2: string;
  i: Integer;
begin
  i := 0;
  S2 := S + Border;
  repeat
    a[i] := Copy(S2, 0,Pos(Border, S2) - 1);
    Delete(S2, 1,Length(a[i] + Border));
    Inc(i);
  until S2 = '';
end;

yankee 21. Jul 2004 13:18

Re: Comma-Separated-String: Schnelles Zerlegen?
 
Habe mal sowas ähnliches gehabt:
Mein Thread

P.S.: Nutze die Suchenfunktion!


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