Delphi - Pesquisar dentro de uma String


procedure TForm1.Button1Click(Sender: TObject);
begin
   if (pos('Teste','abcdTeste012345')) then
      ShowMessage('Texto encontrado!');
end;

Comentários

Postagens mais visitadas deste blog

Delphi - ReportBuilder – Conhecendo os Recursos deste Gerador de Relatórios

Delphi - Stringgrid com Alinhamento à Direita, à Esquerda e Centralizado

Delphi - Instalando a versão Trial do Delphi 2007 for Win 32