Искать в заметке в Delphi?

Может ли кто-нибудь дать мне простой код, который дал бы мне возможность искать простую строку в заметке и выделять ее в заметке после того, как ее нашли?