Boa tarde a todos! Estou fazendo pesquisa por nome completo em um TMemo com Delphi, quando o nome inteiro encontra-se na mesma linha funciona bacana, porém se parte do nome está numa linha e a outra parte na linha seguinte, a pesquisa não encontra. Alguma ideia pra solucionar isso?
procedure TForm1.BitBtn4Click(Sender: TObject);
var
acha:string;
begin
if (Memo1.GetTextLen > 0) then
begin
zPessoa.First;
if not zPessoa.Eof then
repeat acha:=zPessoanome.Value;
if pos(acha, AnsiUpperCase(memo1.Lines.text))>0 then begin