Welches Delphi hast du?
Dann versuchs mal mit "val", das gabs schon unter Borland Pascal.
irgendwie so:
Delphi-Quellcode:
max:=0;
pos:=0;
for i:=0 to s.count-1 do begin
val(s[i],tmp,fehler);
if (fehler=0)and(tmp>max) then begin
max:=tmp;
pos:=i;
end;
end;
if pos=0 then //raise error
else //benutze s[pos];
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.