AnsiContainsText

[sakura]

Eigentlich wie alle anderen auch.

Delphi-Quellcode:

if AnsiContainsText('Die Delphi-PRAXiS hilft immer', Edit1.Text) then
  ShowMessage(Edit1.Text + ' kommt im durchsuchten String vor')
else
  ShowMessage(Edit1.Text + ' kommt im durchsuchten String NICHT! vor');

Ein Form mit einem Edit-Feld und einem Button und obiges in das Button-OnClick Ereignis

......