si tienes definida clave principal no deberia dejarte introducir registros repetidos ...
Código Delphi
[-]
try
adomov.InsertRecord([pedido,FormatDateTime('dd/mm/yyyy',Now),strtoint(cantidad),codev,cliente,destino,direccion,'NO']);
except
showmessage('Registro Repetido');
end;