erklärt mir bitte ein programm

[a3rosol]

hallo leute!
ich hab irgendwo im wieten web ein delphi code gefunden der eine bin in dec umwandelt

Delphi-Quellcode:

unction BinToDec(s:string):int64;
var p:int64;
    i:integer;
begin
 p:=0;
 for i:=1 to length(s) do
   p:=p*2+ord(s[i])-ord('0');//s[i] must be '0' or '1'
 result:=p;
end;

bis zu dem for i:=1 to length(s) do versteh ich ja alles (was ja nix ist) aber dann versteh ich gar nix mehr
ich hab rausgefundne:
The Ord function returns an integer value for any ordinal type Arg.
It is principally used to convert characters or enumerations into their numeric equivalents.
aber ich versteh da nur bahnhof...
bitte helft mir...