Verificação

[Evandro Montenegro 0]

Como, a partir da leitura de um código de barras eu posso inserir dados em uma tabela verificando se o cliente é o mesmo do código lido?

 

Obs.: O leitor de código joga o cód. do cliente para um edit, quando preencher verificar na tabela cliente se é o código cadastrado para aquele cliente.

 

Preciso da sintaxe.

[Hugo Slepicka 0]

procedure TForm1.Edit1Change(Sender: TObject);begin  If Length(Edit1.Text) = 8 then  Begin	 If Not TblCliente.Locate('Cliente_Id',Edit1.Text,[]) then		showmessage('Cliente não confere com o código');  End;end;

[marcio.theis 3]

Pode-se fazer como o Hugo Slepicka disse, ou então montar um função passando o que foi lido, e nesta função valida a existência do cliente, dependendo do tamanho da sua tabela e n° de registros na cliente, vai ser mais rápido do que usar o Locate.