![]() |
String in drei teilen
ich habe einen string der so aussieht "test|test1|test2" nun will ich daraus 3 strings machen die dann so ausehen "test", "test1", "test2". weiß jeman wie dass funktioniert
|
AW: String in drei teilen
|
AW: String in drei teilen
in einem php scribt sieht dass so aus
Code:
wie sieht dass in delphi aus.
$ausgabe = stripslashes($ausgabe);
$zerlegen = explode("|", $ausgabe); |
AW: String in drei teilen
Lösung per Stringliste
Delphi-Quellcode:
sl.Strings[0] enthält dann 'test1';
var
sl: TStrings; ... begin sl := TStringlist.Create; sl.Delimiter := '|'; sl.DelimitedText := 'test|test1|test2'; ... sl.Free; |
AW: String in drei teilen
Zitat:
|
AW: String in drei teilen
Entweder eine StringListe wie von mkinzler schon genannt oder Du bastelt Dir eine eigene Funktion:
z.B.
Delphi-Quellcode:
Aufruf:
procedure ExplodeString(DelimitedString : String; VAR Part1, Part2, Part3 : String);
begin (* Erster Teil *) Part1 := copy(DelimitedString, 1, Pos('|', DelimitedString)-1); (* Zweite Teil *) DelimitedString := Delete(DelimitedString, 1, Pos('|', DelimitedString)); Part2 := copy(DelimitedString, 1, Pos('|', DelimitedString)-1); (* Dritter Teil*) Part3 := copy(DelimitedString, Pos('|', DelimitedString)+1, Length(DelimitedString)); end;
Delphi-Quellcode:
end;
VAR GanzerString, Teil1, Teil2, Teil3 : String;
[...] GanzerString := 'ErsterTeil|ZweiterTeil|DritterTeil'; ExplodeString(GanzerString, Teil1, Teil2, Teil3); ShowMessage(Teil1); ShowMessage(Teil2); ShowMessage(Teil3); [/DELPHI] ... Ungetestet! |
AW: String in drei teilen
Zitat:
|
AW: String in drei teilen
scrat1979 ich habe dein code mal ausprobiert da der von mkinzler nicht funktioniert hatt aber es kommen folgende fehlermeldungen:
[Error] Unit2.pas(30): Incompatible types: 'String' and 'Integer' [Error] Unit2.pas(32): Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter' [Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit2.pas' |
AW: String in drei teilen
Wobei die Funktion nicht auf 3 Parts begrenzt sein sollte :)
Schöner wäre eine while-do Schleife und als Result ein dynamisches Array :) |
AW: String in drei teilen
Na wie wäre es mal mit selber testen ?
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:56 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