Pos - ele s� retorna a posi��o de uma palavra?

Question

Bom tenho o seguinte problema digitei os comandos abaixo para que ele me disse-se a posi��o que esta a palavra na frase, ent�o localizando a posi��o ele copiaria o erro inteiro para um memo.procedure ...

F�bio Feltrin · Answer

Traduzindo o erro acima � que ele localiza apenas a posi��o de uma letra por exemplo, eu digitp By no edit e ele n�o localiza, agora se eu digitar b ele localiza todos os b da tabela....

Lucas Silva · Answer

[quote:718c64225e=�F�bio Feltrin�] By no edit e ele n�o localiza, agora se eu digitar b ele localiza todos os b da tabela.[/quote:718c64225e]

.... Qual � o texto do memo??
Parece que n�o existe este texo �by� no memo�!

Pehdepano · Answer

O comando pos() n�o retorna uma palavra. Ele retorna a posi��o da primeira letra da primeira palavra encontrada;

ex: pos(�By�, �abcde/e*f/by/allll�); {retorna 11}

procedure TF_PesErroCli.SpeedButton1Click(Sender: TObject);
Var
posicao:Integer;
copia, pa: String;
begin

DM.ADOT_Cad_Rel.First;

while not DM.ADOT_Cad_Rel.Eof then
begin
posicao := pos(Edit1.Text,DM.ADOT_Cad_RelERRO.Value);

If posicao > 0 then
Begin
Memo1.Lines.Add(DM.ADOT_Cad_RelERRO);
showmessage(copy(DM.ADOT_Cad_RelERRO.AsString, posicao, lenght(Edit1.text));
End;
DM.ADOT_Cad_Rel.Next ;
end;

end;

F�bio Feltrin · Answer

blz este caso ja foi resolvido, obrigrado pela sua aten��o pessoal vlw mesmo agente se fala !!!!...