hilfe bei parameterübergabe

[morti]

hi ich bin noch blutiger anfänger in delphi.
also ich programmiere gerade ein tool was von binär in dezimal und andersherum umwandelt.
das ganze programm funktioniert auch, nur jetzt wollte ich die algorythemn in funktionen packen

hier der quellcode

Delphi-Quellcode:

function bin2dec(input : string) : integer;
var
        binlaenge:    integer;
        zaehler:      integer;
begin
                bin2dec   :=0;
                binlaenge :=length(input);
        for zaehler :=0 to binlaenge-1 do
                begin
     {----->}bin2dec := bin2dec + strtoint(input[binlaenge-zaehler]) * ceil(power(2,zaehler));{<-----}
                end;
end;

procedure TMain.gobuttonClick(Sender: TObject);
var input:      string;
begin
input:= inputfield.text;
outputfield.Text :=inttostr(bin2dec(input));
end;

in der mit {----->} umklammerten zeile kommt folgender compiler fehler :

nicht genügend wirkliche parameter

durch auskomentieren stellte sich raus, dass er ein problem mit den 2ten bin2dec hat

hoffe mir kann jemand helfen, weil hab echt kein plan wo das problem ist.


mfg morti