Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-08-2006
Avatar de destrukthor
destrukthor destrukthor is offline
Miembro
 
Registrado: may 2006
Posts: 57
Poder: 21
destrukthor Va por buen camino
Gracias Roman

Bien ahora entiendo porq no funciona el cancel, efectivamente cambia la posicion de registro al encontrarlo.
Bien ahora solo si puedes me darias un ejemplo para el evento OnPostError, si no fuese molestia.
Desde ya Gracias.
__________________
Solo se q nada Se, Cada dia es un aprendisaje y asi siempre sera.
Responder Con Cita
  #2  
Antiguo 01-08-2006
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
OnPostError puede generarse por diversas razones así que debes distinguir cuál fue. Aquí tienes un ejemplo de marcoszorrilla donde se trata esto.

// Saludos
Responder Con Cita
  #3  
Antiguo 01-08-2006
Avatar de PepeLolo
PepeLolo PepeLolo is offline
Miembro
 
Registrado: jun 2003
Ubicación: Fuenlabrada - Madrid - Espagna
Posts: 265
Poder: 24
PepeLolo Va por buen camino
Como dice roman, puedes usar el ejemplo que te indica o esta otra forma; esto depende del metodo que quieras usar para la validación de la clave.

Este ejemplo es para cualquier tipo de validación (clave primaria, clave foranea)

Código Delphi [-]
{
*Documentación*
*Nombre: QCatalogosCDPROVEEDORValidate
*Tipo: procedure
*Título: Mantenimiento de Proveedores
*Autor: JMCDM INFOSERVICIOS U.S.Y.P. (Unidad de Soluciones y Proyectos)
*Descripción:
       Comprobar si el proveedor ya existe 

*Parámetro de entrada:


*Modificaciones*
*Fecha:
*Autor:
*Descripción:
}
begin
  if Sender.AsString = '' then Exit;
  if BuscarSql('SELECT CDPROVEEDOR FROM HABI_PROVEEDORES WHERE CDPROVEEDOR = ' + '''' + Sender.AsString + '''') <> '' then
   begin
     Sender.FocusControl;
     ECDPROVEEDOR.Clear;
     DataBaseError('Ya existe el Proveedor');
   end;
end;

Espero que te sirva.
__________________
PepeLolo
El hombre el único virus que mide más de unas cuantas micras
Responder Con Cita
  #4  
Antiguo 01-08-2006
Avatar de destrukthor
destrukthor destrukthor is offline
Miembro
 
Registrado: may 2006
Posts: 57
Poder: 21
destrukthor Va por buen camino
Fiuuuu paso volando ;)

Uffff..
Amigo viendo tu codigo, creo q me falta mucho para llegar a entender este codigo.
Sorry no lo entendi, te recuerdo q soy novato y estoy haciendolo en Paradox 7, creo q no entiendo mucho la validacion en delphi, antes trabajabaz en Clipper y el control de los ingresos lo hacia yo directamente estaba acostumbrado a validarlo con comandos y mensajes propio.
Sorry nuevamente por mis problemas.
Pero quiero aprender bien por eso mi insistencia me parece q Delphi fue mi mejor opcion antes programaba en VisualFox Pro, pero los metodos de programacion es muy larga y engorroza.
__________________
Solo se q nada Se, Cada dia es un aprendisaje y asi siempre sera.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
busqueda sql Dark Aeris Firebird e Interbase 10 06-06-2006 23:05:20
Busqueda Con Una Sql salvanano SQL 5 05-05-2005 20:59:11
Problemas con busqueda romansiux Conexión con bases de datos 3 30-04-2005 17:48:58
busqueda alachaise Internet 1 31-03-2005 16:57:34
Problemas con los campos Busqueda walace_soy Firebird e Interbase 5 24-09-2004 09:02:15


La franja horaria es GMT +2. Ahora son las 14:34:35.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi