Inserção de Dados Delphi+Mysql+ZeosLib

Olá galera! Shalom de Deus para todos e Feliz Páscoa!
Estou com um problema aqui, pois tentei fazer numa aplicação a inserção de dados no banco, com o código e dá erro, na execução!

o código é:

DmGeral.ZQuery.Active:=False;
DmGeral.ZQuery.ClearFields;
DmGeral.ZQuery.SQL.Add('insert into cadastro(Nome,Endereco,Bairro,Cidade,Cep,Uf,Telefone)values(:Nome,:Endereco,:Bairro,:Cidade,:Cep,:Uf,:Telefone)');
DmGeral.ZQuery.SQL.Add('insert into cadastro(Celular,Sexo,Funcao,DataAdmissao,SalarioBruto,DescTransporte,DescAlimentacao,DescSaude,SalarioLiquido)values(:Celular,:Sexo,:Funcao,:DataAdmissao,:SalarioBruto,:DescTransporte,:DescAlimentacao,:DescSaude,:SalarioLiquido)');
DmGeral.ZQuery.ParamByName('Nome').AsString:=EdtNome.Text;
DmGeral.ZQuery.ParamByName('Endereco').AsString:=EdtEndereco.Text;
DmGeral.ZQuery.ParamByName('Bairro').AsString:=EdtBairro.Text;
DmGeral.ZQuery.ParamByName('Cidade').AsString:=EdtCidade.Text;
DmGeral.ZQuery.ParamByName('Cep').AsString:=EdtCEP.Text;
DmGeral.ZQuery.ParamByName('Uf').AsString:=CBUF.Text;
DmGeral.ZQuery.ParamByName('Telefone').AsString:=EdtFone.Text;
DmGeral.ZQuery.ParamByName('Celular').AsString:=EdtCelular.Text;
DmGeral.ZQuery.ParamByName('Sexo').AsString:=CBSexo.Text;
DmGeral.ZQuery.ParamByName('Funcao').AsString:=CBFuncoes.Text;
DmGeral.ZQuery.ParamByName('DataAdmissao').AsString:=EdtDataAdmissao.Text;
DmGeral.ZQuery.ParamByName('SalarioBruto').AsFloat:=EdtSalarioBruto.Text;
DmGeral.ZQuery.ParamByName('DescTransporte').AsBoolean:=CheckBoxTransp.Checked;
DmGeral.ZQuery.ParamByName('DescAlimentacao').AsBoolean:=CheckBoxAlimen.Checked;
DmGeral.ZQuery.ParamByName('DescSaude').AsBoolean:=CheckBoxSaude.Checked;
DmGeral.ZQuery.ParamByName('SalarioLiquido').AsFloat:=EdtSalarioLiquido.Text;
DmGeral.ZQuery.ExecSQL;
DmGeral.ZQuery.Active:=True;

O erro apresentado eh:
'ZQuery: Dataset not in edit or insert mode'

valeu galera .... espero que v6 em ajudem