Zufällig habe ich zwei Funktionen die das erledigen:
Delphi-Quellcode:
function GetText1(Str: String; CharD: Char): String;
begin
Result := Copy(Str, 1, Pos(CharD, Str) - 1);
end;
function GetText2(Str: String; CharD: Char): String;
begin
Result := Copy(Str, Pos(CharD, Str) + 1, Length(Str));
end;
Die erste Funktion liefert alles vor den Trennzeichen, die zweite Funktion alles nach dem Trennzeichen.
Delphi-Quellcode:
Text1 := GetText1('2 0.5', ' ');
Text2 := GetText2('2 0.5', ' ');
Den Rest mit StrToFloat konvertieren.