[[Caral]]

Hola
Asi se soluciona el dedazo, poniendo delante del then:

Código Delphi [-]
if MessageBox(Handle, 
                PChar('Esta Seguro de que desea' + #13#10 + 
                      'Insertar El Nuevo Registro'), 
                PChar('Registros'),
                MB_OKCANCEL + MB_DEFBUTTON1 + MB_SYSTEMMODAL) = IDOK 
// Esto si no quiere insertar, osea Cancelar, limpia los DBEdit y da el foco al DBedit que necesites, yo puse DBEdit1 por poner algo, tu eliges
     DBEdit1.Clear;
     DBEdit1.SetFocus;
then
 begin
// Aqui pones la sentencia que usas para insertar en la tabla, Ejemplo
ZTable.Insert;
DBEdit1.Text;
DBEdit2.Text;
DBEdit3.Text; // Etc, Etc, Etc
ZTable.Post;

Tabular es el 9, el 10 no tengo idea, pero funciona y se ve bien.
Como esta Murcia
Saludos