Inserção de Dados...

[wvitorhugo 0]

estou com um baita problema em uma aplicação!

É o seguinte, na inserção de dados quando ponho pra confirmar a inserção sem nenhum dado, o registro é confirmado. o código é o seguinte:

 

procedure Tfm_registro.Bt_ConfirmaClick(Sender: TObject);begin try		Dm_Conexao.Zqry_Registro.ApplyUpdates;	  Dm_Conexao.Zqry_Registro.CommitUpdates;	 	// Dá um commit na CONEXÃO;		Dm_Conexao.ZConnect.Commit; except Application.MessageBox('Digite os dados', 'Impossivel confirmar',Mb_Ok+Mb_IconWarning); Bt_Cancela.click; Dm_Conexao.Zqry_Registro.Delete; Dm_Conexao.Zqry_Registro.MoveBy(+1); exit; end;		Dm_Conexao.Zqry_Registro.ApplyUpdates;	  Dm_Conexao.Zqry_Registro.CommitUpdates;	 	// Dá um commit na CONEXÃO;		Dm_Conexao.ZConnect.Commit;	  Dm_Conexao.Zqry_Registro.Refresh;end;

[bastard2003 4]

dai rapaz beleza?! taca um if antes.. testando se ta vazio ou não... é uma dica! abraços!