Sicher daß du nur EIN Zeichen an z übergibst?
versuch's besser mal mit einem Char für Z, da kannst du dann nur einen Char übergeben und es sollte gehn
Delphi-Quellcode:
function StrCharCount(wort: string; c: char): Integer;
var
I: Integer;
begin
Result := 0;
for I := 1 to Length(wort) do
if wort[I] = c then
Inc(Result);
end;