FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Controlar el post y edit de un TDBNavigator
Hola foro
Alguien me puede decir como se puede controlar el que no se pueda grabar o editar un registro que no tengan todos los campos rellenados. Trabajo con un TADOTable, los tipicos DBEdit y un TDBNavigator Porque no funciona esto procedure TfrmArticulos.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin //if (frmPrincipal.TablaArticulos.State = dsInsert) or (frmPrincipal.TablaArticulos.State = dsEdit) then // begin if (dbNombre.Text = '') or (dbDescripcion.Text = '') or (dboCategoria.Text = '') or (dbPrecio.Text = '') or (dboLocal.Text = '') then begin ShowMessage('Registro no guardado: Debe Rellenar todos los campos'); frmPrincipal.TablaArticulos.Cancel; end; // end; end; Ademas lo que esta comentado es porque no me reconoce la propiedad dsInsert ni dsEdit me dice que variable no declarada. El codigo de arriba no funciona cuando intento añadir un registro o editar algun existente me dice que no estoy en estado dsInsert o dsEdit. Se os ocurre algo, porque tendria que volver modificar tres formularios para controlar esto y es un faenon. Muchas Gracias por adelantado. Salu2. |
|
|
|