Hola Ade
En donde vas a insertar el registro pones:
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
then
DBEdit1.Clear;
DBEdit1.SetFocus;
begin
ZTable.Insert;
DBEdit1.Text;
DBEdit2.Text;
DBEdit3.Text; ZTable.Post;
Espero te sirva
Saludos