Esse artigo faz parte da revista Clube Delphi Edição 84. Clique aqui para ler todos os artigos desta edição

-bidi-font-family: MinionPro-Regular; mso-fareast-language: PT-BR">com alguns nomes de pessoas, logo em seguida crie uma função com o código da Listagem 1.

 

Listagem 1. Código de busca

function TForm1.Procura(Txt: string): string;

var

iA: Integer;

begin

...

Quer ler esse conteúdo completo? Tenha acesso completo