Aus einem Text nur vordefinierten Bereich kopieren

[Metobaba]

Hallo zusammen,
ich möchte aus einem Text
"Grundschule m. Erweiterung 2017 - 0712 -"
nur das "- 0712 - rauskopiert haben

kann mir jemand bitte helfen?

[himitsu]

* an den - auftrennen
SplitString
string.Split
oder Dergleichen

* mit Pos und PosEx die - suchen
und das dazwischen via Copy rausholen

* via RegEx

* ganz modern eine KI / LLM drauf loslassen

* ...

[Hobbycoder]

Result:=copy(text, pos('-', text), length(text)); oder
Result:=copy(text, pos('-', text), text.length); Dann darf in dem Text vor dem "- 0712 -" natürlich kein Bindestich vorkommen

Oder, wenn die Zahl immer die gleiche Länge hat:
Result:=copy(text, text.length-8, 8); dann werden immer die 8 letzten Zeichen in Result kopiert.

[himitsu]

Delphi-Quellcode:

a := Pos('-', Text);
e := Pos('-', Text, e + 1);  // Pos mit 3 Parametern, bzw. früher PosEx
Result := Copy(Text, a, e - a + 1);

Delphi-Quellcode:

uses System.RegularExpressions;

var S := 'Grundschule m. Erweiterung 2017 - 0712 -';
ShowMessage(
    '"' + TRegEx.Match(S, '-[^-]*-').Value + '"'
  + sLineBreak
  + '"' + TRegEx.Match(S, '-([^-]*)-').Groups[1].Value.Trim + '"'
);

// Prüfungen auf .Success und .Groups.Count hab ich hier natürlich vergessen