[Delphi] Odwrotność Pos

Jest funkcja "odwrotna" do Pos? Tzn. podaję stringa i indeks, a ta zwraca mi znak w tym stringu pod podanym indeksem.

Nigdzie na forum czegoś takiego nie znalazłem, w pomocy do delphi - nie ma.. ;-(

[Dopisane:] Ja to głupi jestem... Trzeba było pomyśleć i zrobione...

function OdwrPos(S: string; I, Dlg: integer) : String;
begin
Result := Copy(S, I, Dlg);
end;

Funkcja zwraca string pod podanym indeksem w podanym stringu o podanej długości

var
S: string;
Indeks: Integer;
begin
ShowMessage(S[Indeks]);
end;

dzięki, Dryo, chyba zastosuje Twój sposób...

var
S: string;
Indeks: Integer;
begin
ShowMessage(S[Indeks]);
end;

trzeba wspmnieć o jeszcze jednym. Musi być spełniony warunek:
Indeks > 0 czyli od 1 do Length(S);