Ver Mensaje Individual
  #15  
Antiguo 18-07-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 25
Caral Va por buen camino
Hola
Gracias por los comentarios de apoyo, me hacen sentir que si aporto algo, se que me equivoco, pero, quien no.
No logro entender bien lo que busca hacer Temporal, se habla de una llave duplicada, pero tambien de insertar un registro, me parece.
Bueno, si es un asunto de tratar de insertar un registro y hacer la comprobacion de que no este repetido, aqui tienes un pedacito de un codigo de mi programa que hace eso, analizalo, tal vez sea lo que buscas.
Código Delphi [-]
procedure TFSelCodigo.BitBtn1Click(Sender: TObject);
begin
   If Edit1.Text <> '' then
   Begin
     AdoQuery1.Parameters[0].Value := Edit1.Text;
     AdoQuery1.Active := true;
     IF Adoquery1CodParte.AsString = Edit1.Text then
     MessageDlg('Código ya existe, favor seleccionar otro',mtError,[mbOK],0)
     else Begin
            Codigo:= Edit1.text;
            Cancelar:=False;
            Close;
          end;
     AdoQuery1.Active := false;
   end
   else MessageDlg('El código no debe estar en blanco, si desea cancelar presione escape.',mtError,[mbOK],0)
end;
Espero que te sirva aunque sea para aprender algo nuevo.
Saludos
Responder Con Cita