Funktion für Galgenraten will nicht Funktionieren :(

[Pr0g]

Warum machst du es nicht so:

Delphi-Quellcode:

Function CheckBuchstabe(CONST aBuchstabe : Char; CONST aString : String) : Boolean;
begin
  Result := (Pos(aBuchstabe, aString) > 0);
end;

Edit: Eine Klammer vergessen.