String nach bestimmten Zeichen(Buchstaben) absuchen

[G4schi]

Nun denn, ich habe es bis jetzt soweit geschafft mit dem Code:

Delphi-Quellcode:

implementation

{$R *.dfm}
var s_Wort: string;


procedure TForm1.bt_HClick(Sender: TObject);

const bt_H = 'h';

begin
  s_Wort := (ed_Eingabe.Text);
  if StrScan(s_Wort, 'h') <> nil
  then Lb_zaehler.Caption := Lb_zaehler.Caption + '1';
end;

Das ist jetzt nur der Teil mit dem Button. Ich wollte es erstmal so angehen, dass ich dem Button eine Konstante gegeben habe
der Buchstaben 'h' und wenn der ihm s_Wort vorhanden ist, soll einfach erstmal eine '1' im Label stehen.

Jetzt kriege ich 2 Fehlermeldungen:
[dcc32 Fehler] Geigenmännchen.pas(40): E2250 Es gibt keine überladene Version von 'StrScan', die man mit diesen Argumenten aufrufen kann

[dcc32 Warnung] Geigenmännchen.pas(40): W1000 Symbol 'StrScan' ist veraltet: 'Moved to the AnsiStrings unit'

Was kann ich damit anfangen?