Re: [delphi-br] Re: Igual no Clipper

Obrigado amigo, vou tentar... --- cchirolli <[EMAIL PROTECTED]> escreveu: > Tenta isso: Declare uma variável privada vprNome e > no OnkeyPress do > edit coloque esse código. > >   if key in ['a'..'z','A'..'Z',' ','1'..'0'] then > begin >    vprNome:=vprNome+key; >    if  tabela.

[delphi-br] Re: Igual no Clipper

Tenta isso: Declare uma variável privada vprNome e no OnkeyPress do edit coloque esse código.   if key in ['a'..'z','A'..'Z',' ','1'..'0'] then     begin    vprNome:=vprNome+key;    if  tabela.Locate('nome',vprNome, [loCaseInsensitive,loPartialKey]) then begin    key:=