In einer URL an den zweiten Punkt kommen

[XHelp]

Zitat von Matze:

@XHelp: Deine Funktion müsste die Position, von hinten gesehen, des letzten Punktes liefern, meine ich.

Dann halt:

Delphi-Quellcode:

function pospunkt(s:string):integer;
var
i:integer;
firstpunkt:boolean;
begin
result:=0;
firstpunkt:=false;
for i:=1 to length(s) do begin
  if (s[i]='.') and (firstpunkt=true) then begin
    result:=i;
    Exit;
  end;
  if (s[i]='.') and (firstpunkt=false) then firstpunkt:=true;
end;