AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren

Trennen von einzelnen Wörtern

Ein Thema von Quick_silver · begonnen am 11. Feb 2003 · letzter Beitrag vom 11. Feb 2003
Antwort Antwort
Quick_silver

Registriert seit: 2. Jan 2003
78 Beiträge
 
Delphi 6 Enterprise
 
#1

Trennen von einzelnen Wörtern

  Alt 11. Feb 2003, 14:54
Wie kann ich eine Reihe von Wörtern aus einem String trennen die mit | getrennt sind? Ich kann sie auch mit , " " ; oder so trennen!
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.576 Beiträge
 
Delphi 10.4 Sydney
 
#2
  Alt 11. Feb 2003, 14:58
Willst Du die einzelnen Wörter in eine Stringliste laden oder die einfach eins nach dem anderen abarbeiten?

......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
Quick_silver

Registriert seit: 2. Jan 2003
78 Beiträge
 
Delphi 6 Enterprise
 
#3
  Alt 11. Feb 2003, 15:02
Eigentlich egal ich muß nur x Zahlen die ich von nem Script bekomme auflisten!
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.576 Beiträge
 
Delphi 10.4 Sydney
 
#4
  Alt 11. Feb 2003, 15:09
Dann nutze folgende Funktion
Delphi-Quellcode:
function Fetch(var List: string; Delimiter: Char): string;
var
  P: Integer;
begin
  P := Pos(Delimiter, List);
  if P > 0 then
  begin
    Result := Copy(List, 1, Pred(P));
    Delete(List, 1, P);
  end else begin
    Result := List;
    List := '';
  end;
end;
Einsatzbeispiel mit Woerter für die Liste Deiner Zahlen getrennt durch |.
Delphi-Quellcode:
while Woerter <> 'do
  ShowMessage(Fetch(Woerter, '|'));
......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie
(Moderator)

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#5
  Alt 11. Feb 2003, 15:10
Lad dir den Text in eine Stringliste, dann ersetzt du alle "|" durch Kommas mit StringReplace und dann kannst du mit der Eigenschaft CommaText arbeiten. Wäre so jetzt auf die Schnelle das einfachste, denke ich.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Quick_silver

Registriert seit: 2. Jan 2003
78 Beiträge
 
Delphi 6 Enterprise
 
#6
  Alt 11. Feb 2003, 16:25
Thx Danke
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

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 +2. Es ist jetzt 06:05 Uhr.
Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf