![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
#2
|
|||
|
|||
|
prueba con
Código:
for datos := 0 to tabla.FieldCount-1 do
if (tabla.Fields[datos].Required) and (tabla.Fields datos].Text '') then begin
showmessage('Debe introducir un valor en '+ tabla.Fields datos].DisplayName);
dbgrigd.setfocus;
dbgrigd.SelectedField:=tabla.Fields[datos];
exit;
end;
|
|
|
|