Fórum O que há de errado com este codigo??? #169187
13/07/2003
0
Tenho um toolbutton na minha aplicaçao que é um botão de exclusão de registros da tabela e estou usando o seguinte codigo:
:oops: [color=red:7e35039fa1]if application.messagebox(´ Deseja Realmente Excluir o Registro?´,´PERGUNTA´,
mb_YESNO+MB_ICONQUESTION )=IDYES THEN
tblcad.delete;
SHOWMESSAGE (´Registro excluido´);[/color:7e35039fa1]
o prblema e que quando clico nele e escolho não excluir o sistema me retorna a mesagem de registro excluido quando deveria me retorna apenas se clicasse em sim. :oops:
Andy
Curtir tópico
+ 0Posts
13/07/2003
Obubiba
Gostei + 0
13/07/2003
Roger_malk
-----------------------------------------------------------------
if application.messagebox(´ Deseja Realmente Excluir o Registro?´,´PERGUNTA´,
mb_YESNO+MB_ICONQUESTION )=IDYES THEN
(*-------Ponha aqui o begin para que ele execute tudo-----*)
BEGIN
(*-----------------------------------------------------------------*)
tblcad.delete;
SHOWMESSAGE (´Registro excluido´);
(*----------------- Agora termine ------------------------------*)
END;
(*-----------------------------------------------------------------*)
Espero ter ajudado.......
roger_malk
Gostei + 0
13/07/2003
Andy
Valeu pessoa cs são d+++++++
Andy
Gostei + 0
13/07/2003
Anderson_blumenau
lembre-se que depois do [b:05158a9754]THEN[/b:05158a9754] se voce nao colocar o [b:05158a9754]Begin[/b:05158a9754]
o if vai valer apenas para a primeira linha de codigo depois do then
ex:
[b:05158a9754]if[/b:05158a9754] condicao [b:05158a9754]then[/b:05158a9754]
este codigo faz parte dessa condicao if;
este codigo nao faz parte da condicao if;
ex2
[b:05158a9754]if[/b:05158a9754] condicao [b:05158a9754]then[/b:05158a9754]
[b:05158a9754]begin[/b:05158a9754]
este codigo faz parte desta condicao if;
este codigo faz parte desta conicao if;
[b:05158a9754]end[/b:05158a9754]
Gostei + 0
13/07/2003
Glaubergs
´Veja o Delphi. Sinta o Delphi. Seja o Delphi.´
Hehe, eu recomendo, ás vezes dá certo, rs ...
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)