Problem z usunięciem errora przy kompilacji

Mam w swoim programie kod:

if i>=Length(S) then
begin
 ...
end;

Przy tym if'ie wywala mi błąd "Constant expression required". Wiem, na czym on polega, wiem też, że powoduje go Length(S), które niekoniecznie jest stałe. Nie wiem tylko jak to naprawić. Z góry dzięki za wszelką pomoc.

niezbyt dużo powiedziałeś ..ale może spróbuj ord(s[0]) lub
a:=length(s);
if i>= a then ....