State in [DsEdit, DsInsert] ***Dúvidas***

Delphi

19/02/2003

Pessoal, estou colocando esse código no evento OnClose do meu form:

if DataModule1.dsExe.State in [DsEdit,DsInsert] then begin
if (mrYes = MessageDlg(´Cancelar esta operacao ?´,mtWarning,[mbYes,mbNo],0)) then begin
DataModule1.dsExe.DataSet.Cancel();
tbtnExeCanc.OnClick(Sender);
end
else Abort;

Quero que qdo a minha tabela tblexe ligada ao data source dsExe estiver editando ou inserindo ele faça essa pergunta antes de fechar o form.

Mas não tô entendendo tem hora que o código funciona, outra hora não.
Como pode acontecer isso!!!!

Não tô entendendo :oops:


Debora

Debora

Curtidas 0

Respostas

Anonymous

Anonymous

19/02/2003

Pessoal, estou colocando esse código no evento OnClose do meu form: if DataModule1.dsExe.State in [DsEdit,DsInsert] then begin if (mrYes = MessageDlg(´Cancelar esta operacao ?´,mtWarning,[mbYes,mbNo],0)) then begin DataModule1.dsExe.DataSet.Cancel(); tbtnExeCanc.OnClick(Sender); end else Abort; Quero que qdo a minha tabela tblexe ligada ao data source dsExe estiver editando ou inserindo ele faça essa pergunta antes de fechar o form. Mas não tô entendendo tem hora que o código funciona, outra hora não. Como pode acontecer isso!!!! Não tô entendendo :oops:


Débora,

Este tratamento deve ser feito no evento OnCloseQuery. Utilize a propriedade CanClose para permitir ou não o fechamento do formulário.

Atenciosamente,

[]´s
Aroldo Zanela


GOSTEI 0
POSTAR