Find det højeste tal

Jeg har en string, der ser således ud:

24252 - 235252 - 3,3 - 1,633 - 92302

Hvordan laver jeg så en funktion/procedure, der finder det højeste tal, og lægger det over i en variabel af typen Real?

Alt, noget lignende det her:

var r : real; s: string;
begin
  s := '24252 - 235252 - 3,3 - 1,633 - 92302';
  r := FindDetHoejesteTal(s);
end;