Ver Mensaje Individual
  #1  
Antiguo 26-04-2007
cya2277 cya2277 is offline
Registrado
 
Registrado: abr 2007
Posts: 4
Reputación: 0
cya2277 Va por buen camino
ayuda con base de datos paradox

Hola compañeros soy nuevo en esto e intento hacer un pequeño programa utilizando el paradox y delphi 7; lo que intento hacer es que no hayan registros duplicados ya que cuando los hay automaticamente me saca del programa, el codigo lo uso en el boton guardar y lo que se me ocurre es que primero antes de guardar recorrer la base de datos si encuentra un registro duplicado que me mande un mensaje que ya existe el registro y que me mantenga en el programa, y si este no existe que me lo almacene.
espero obtener su ayuda. gracias..... el codigo que uso es este:

if Messagedlg('¿Estas Seguro que deseas Guardar este registro?',mtconfirmation,[mbyes,mbno],0)= mryes then
datamodule1.tblClientes.Post
else
datamodule1.tblClientes.Cancel;
progressbar1.Position:= 0;
progressbar1.Max := 50 ;
for i := 0 to 50 do
begin
progressbar1.Position := i;
sleep(2);
end;
for i := 50 downto 0 do
begin
progressbar1.Position := i;
sleep(0);
end

end;
Responder Con Cita