Pesquisar na Comunidade
Mostrando resultados para as tags ''Field''.
Encontrado 1 registro
-
procedure TFrmPrincipal.EdPlacaMovExit(Sender: TObject); begin SQLEntrada.Close; SQLEntrada.SQL.Clear; SQLEntrada.SQL.Add('select C.COD, C.NOME, C.EMPRESA, C.TIPO, P.COD, P.PLACA from CLIENTE C, PLACA P where C.COD = P.COD and P.PLACA = :pPlaca'); SQLEntrada.ParamByName('pPlaca').AsString := EdPlacaMov.Text; SQLEntrada.Open; if SQLEntrada.FieldByName('C.TIPO').AsString = 'A' then begin ChkTipoClienteMov.Checked[1]; end; end; // Está dando erro "Field not found C.TIPO", porém, o campo existe.