String zerlegen

[mkinzler]

[sehr OT]
Da aber intern Basisadresse + Index * Elementbreite zum Berechner der Addresse verwendet wird, wird oft bei einem Index von 0 gestartet.
[/sehr OT]

[value is NULL]

Delphi-Quellcode:

      a := Copy(tmp_date, 0, 4);
      b := Copy(tmp_date, 5, 2);
      c := Copy(tmp_date, 7, 2);

so funktionierts perfekt

DANKE

[Wolfgang Mix]

Wie schon gesagt
a := Copy(tmp_date, 0, 4); muss eigentlich
a := Copy(tmp_date, 1, 4); heissen

[value is NULL]

das funktioniert prima, ich stehe allerdings schon wieder vor einer
neuen herausforderung... ich habe jetzt nämlich diesen string:

2010\10\07\vctrkdielskdoivüqöökd.wav

um genau zu sein habe ich einige die so aufgebaut sind:

2010\10\07\vctrkdielskdoivüqöökd.wav
2010\10\07\vctrkdkkdow9322qöökd.wav
2010\10\07\vctrkkk3ß2kclsß2kc04.wav

usw usw....
das heisst mit pos usw komme ich hier nicht weiter oder?

gibt es die möglichkeit, das ich delphi sage, schreibe mir alles AB dem 3. Backslash in eine variable?

Danke schon mal

LG

[Bernhard Geyer]

Zitat von value is NULL:

gibt es die möglichkeit, das ich delphi sage, schreibe mir alles AB dem 3. Backslash in eine variable?

Ja, per Regex. In neuen Delphi-Versionen ist dies gleich eingebaut, in alten Versionen kannst du die Reg-Ex-Kompos z.B. von LMD oder diversen anderen Quellen nehmen.

[angos]

Hi,

und was würde dir das bringen?
Oder ist dein Ziel jetzt nicht mehr Tag Monat und Jahr zu bekommen?


Mögiche Lösung wäre über AnsireplaceStr

Delphi-Quellcode:

     
tmp_date := Ansireplacestr(tmp_date, '\', '');
 a := Copy(tmp_date, 1, 4);
      b := Copy(tmp_date, 5, 2);
      c := Copy(tmp_date, 7, 2);

Gruß

[xZise]

Dafür gibt es PosEx oder du zählst manuell mit einer Schleife:

Delphi-Quellcode:

var
  i : Integer;
begin
  i := 1;
  while (i <= Length(S)) and (S[i] <> '\') do
    Inc(i);

Da steht dann nachher in i die Position wo das "\" steht. Und dann mit Copy einlesen:
NewS := Copy(S, i + 1, Length(S) - i); Beides ungetestet.

Übrigens RegEx wären hier etwas overkill oder?

MfG
Fabian

[Hawkeye219]

Hallo,

Zitat von value is NULL:

gibt es die möglichkeit, das ich delphi sage, schreibe mir alles AB dem 3. Backslash in eine variable?

Falls alle Strings so aufgebaut sind, kannst du ExtractFileName verwenden.

Gruß Hawkeye

[Sir Rufo]

@hawkeye erschließt sich mir zwar nicht, weil er dann alles bekommt außer den Zahlen

Es gibt keine Allerweltsmethode um aus irgendwas das Datum zu ermitteln.
Man braucht immer die Information, wie das Datum aufgebaut ist, sonst rummst es.

Code:

20102011

Kann ja nun bedeuten 20.10.2011 oder auch 20.11.2010

Um nun eine Funktion zu basteln, die aus einem beliebigen Text das Datum ermittelt, würde ich der Funktion den Text und das Muster mitgeben

Delphi-Quellcode:

GetDateTime( '20102011', 'JJJJTTMM' )
GetDateTime( '2010\10\07\vctrkdielskdoivüqöökd.wav', 'JJJJ?MM?TT*' )

Edit:
Ok, beim nächsten Mal lese ich auch was er wirklich will
Also vergessen wir mal meinen Beitrag

[value is NULL]

extract file name passt wie die faust aufs aug

DANKE