String in drei teilen

[aurikel_Max]

Zitat von fox67:

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'

Hast du den Code 1:1 übernommen?

Delphi-Quellcode:

procedure TForm1.btn1Click(Sender: TObject);
var
  sl: TStringlist; // oder auch TStrings
begin
  sl := TStringlist.Create;
  sl.Delimiter := '|';
  sl.DelimitedText := 'test|test1|test2';
  ShowMessage(sl.Strings[0]); // zeigt test an
  sl.Free;
end;

Klappt problemlos.

[Sherlock]

Was funktioniert denn bei mkinzlers Code nicht? Das ist einer der einfachsten drei- bis vierzeiler für Delphi.

Sherlock

[mkinzler]

Früher (ältere Delphiversionen) gab es keine Möglichkeit einen Delimiter zu setzen.

Explode(9 aus der CodeLib sollte aber funktionieren

[fox67]

dass heißst ich muß erst einmal die länge des strings ermittelln und dann eis abziehen kippt es da nich eine einfachere methode

[-187-]

Du solltest allgemein den Umgang mit Pos und Copy lernen. Darauf bauen solche Dinge nunmal auf und du wirst immer wieder vor solchen Problemen stehen.

[mkinzler]

Zitat von fox67:

dass heißst ich muß erst einmal die länge des strings ermittelln und dann eis abziehen kippt es da nich eine einfachere methode

(Dynamische) Arrays sind nunmal 0-indiziert

[fox67]

is ja komisch ich habe den code von mkinzler erneut in delphi eingegeben und jetzt funktioniert es plötzlich

[Capa]

nichts für ungut aber ich hab da eher den anschein das dir generell das verständniss
für einige grundfunktionen fehlt, vielleicht mal ein paar kleine tutorials durchlesen
hilft meistens schon enorm.

Ich sag nicht das ich alles kann allerdings kann man viel durch tutorials lernen.
Gibt glaub ich sogar nen thread hier im forum wo verschiedene tutorials aufgelistet
werden.

Wie gesagt ist nciht böse gemeint aber an vielen deiner beiträge merkt man schon das dir
da was fehlt.

Mfg Capa

[scrat1979]

Zitat von -187-:

Wobei die Funktion nicht auf 3 Parts begrenzt sein sollte

Schöner wäre eine while-do Schleife und als Result ein dynamisches Array

Du hast ja Recht aber ich denke meine Lösung ist ein guter Ansatz... mehr sollte es auch nicht sein

[scrat1979]

Zitat von fox67:

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'

hab grad 'nen Fehler gefunden und behoben. Versuch es nochmal...