Re: [delphi-br] Re: Solução para MyConnection

2010-07-23 Por tôpico Fabricio Colombo
Quanto vc está debugando, todas as exceções são mostradas, mesmo as que
estão dentro do bloco try..except..end. Se rodar por fora do delphi ou
desativar o opção Stop on Delphi Exceptions em Debugger Options\Language
Exceptions (Delphi 7), essa mensagem não vai mais aparecer debug.

Em 22 de julho de 2010 18:52, brunolbrasil brunolbra...@yahoo.com.brescreveu:



 Pessoal, não ta dando certo!
 Eu to fazendo assim:

 1 try
 2 myConnection.Connected := false;
 3 myConnection.Server := edit3.Text; //o edit3.text está recebendo um valor
 que não existe

 4 myConnection.Database := edit5.Text;
 5 myConnection.Connected := true; //aqui o programa dá o erro

 6 ShowMessage('1');
 except
 7 showMessage('Existem dados errados! Favor corrigi-los.');
 8 close;
 end;

 O título da caixa com o erro é o seguinte: Debugger Exception
 Notification

 Se eu tirar a linha 5 ele execulta tudo sem problema, mas não faz os
 comandos do except.

 Um abraço a todos!

 --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
 Eduardo Silva dos Santos eduardo@... escreveu

 
  Usa um try except no código.
 
 
  Att,
  ...
  Eduardo Silva dos Santos
  DRD SISTEMAS
  (27) 3218-4201
  (27) 9961-7095
  MSN: eduardo@...

  Site: http://www.drdsistemas.com.br/
  ...
 
 
  Em 22 de julho de 2010 10:24, Bruno Lepesqueur
  brunolbra...@...escreveu:

 
  
  
   Galera... estou com um probleminha!
  
   Eu inseri um myConnection (componente do myDAC) em meu formulário e
 criei
   na
   tela inicial do programa umas opções pra se mudar as configurações
 desse
   componente myConnection (qdo necessário), mas qdo se coloca uma opção
 que
   não existe no formulário, tipo um banco de dados que não existe, o
 sistema
   gera um erro que eu não gostaria que gerasse!
  
   Fiz assim:
   myConnection .Connected := false;
   myConnection .Database := edit5.Text;
   myConnection .Server := edit3.Text;
  
   Qdo o usuário digita no edti3.text um valor de Servidor que não existe,
 o
   sistema gera um erro.
   A solução que pensei foi a seguinte...
   Qdo o erro for gerado, ao invés de aparecer o erro, fazer um if para
 enviar
   uma msg tipo um showMessage informando ao usuário que aquele Server não
   existe, mas eu não sei fazer isso!
  
   Seria mais ou menos assim:
  
   if myconnection.server (192.168.0.1) não existir faça isso...
  
   Podem me dar uma dica inicial?
  
   Um abraço!
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 

  



[As partes desta mensagem que não continham texto foram removidas]





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html




Res: [Bulk] Re: [delphi-br] Re: Solução para MyConnection

2010-07-23 Por tôpico Bruno Lepesqueur
Obrigado Fabricio, mas me dá pelo menos um empurrão pra eu saber como rodar
isso por fora ou como desativar a opção Stop on Delphi Exceptions. Outra
coisa... desabilitar isso é viável?

Um abraço! 
 
 
 
 
---Mensagem original---
 
De: Fabricio Colombo
Data: 07/23/10 07:45:34
Para: delphi-br@yahoogrupos.com.br
Assunto: [Bulk] Re: [delphi-br] Re: Solução para MyConnection
 
Quanto vc está debugando, todas as exceções são mostradas, mesmo as que
estão dentro do bloco try..except..end. Se rodar por fora do delphi ou
desativar o opção Stop on Delphi Exceptions em Debugger Options\Language
Exceptions (Delphi 7), essa mensagem não vai mais aparecer debug.
 
Em 22 de julho de 2010 18:52, brunolbrasil brunolbra...@yahoo.com
brescreveu:
 


 Pessoal, não ta dando certo!
 Eu to fazendo assim:

 1 try
 2 myConnection.Connected := false;
 3 myConnection.Server := edit3.Text; //o edit3.text está recebendo um
valor
 que não existe

 4 myConnection.Database := edit5.Text;
 5 myConnection.Connected := true; //aqui o programa dá o erro

 6 ShowMessage('1');
 except
 7 showMessage('Existem dados errados! Favor corrigi-los.');
 8 close;
 end;

 O título da caixa com o erro é o seguinte: Debugger Exception
 Notification

 Se eu tirar a linha 5 ele execulta tudo sem problema, mas não faz os
 comandos do except.

 Um abraço a todos!

 --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
 Eduardo Silva dos Santos eduardo@... escreveu

 
  Usa um try except no código.
 
 
  Att,
  ...
  Eduardo Silva dos Santos
  DRD SISTEMAS
  (27) 3218-4201
  (27) 9961-7095
  MSN: eduardo@...

  Site: http://www.drdsistemas.com.br/
  ...
 
 
  Em 22 de julho de 2010 10:24, Bruno Lepesqueur
  brunolbra...@...escreveu:

 
  
  
   Galera... estou com um probleminha!
  
   Eu inseri um myConnection (componente do myDAC) em meu formulário e
 criei
   na
   tela inicial do programa umas opções pra se mudar as configurações
 desse
   componente myConnection (qdo necessário), mas qdo se coloca uma opção
 que
   não existe no formulário, tipo um banco de dados que não existe, o
 sistema
   gera um erro que eu não gostaria que gerasse!
  
   Fiz assim:
   myConnection .Connected := false;
   myConnection .Database := edit5.Text;
   myConnection .Server := edit3.Text;
  
   Qdo o usuário digita no edti3.text um valor de Servidor que não existe

 o
   sistema gera um erro.
   A solução que pensei foi a seguinte...
   Qdo o erro for gerado, ao invés de aparecer o erro, fazer um if para
 enviar
   uma msg tipo um showMessage informando ao usuário que aquele Server
não
   existe, mas eu não sei fazer isso!
  
   Seria mais ou menos assim:
  
   if myconnection.server (192.168.0.1) não existir faça isso...
  
   Podem me dar uma dica inicial?
  
   Um abraço!
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 



 
 
[As partes desta mensagem que não continham texto foram removidas]
 
 
 

 
--
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 
 
 
 

[As partes desta mensagem que não continham texto foram removidas]



[delphi-br] Re: Solução para MyConnection

2010-07-22 Por tôpico brunolbrasil
Pessoal, não ta dando certo!
Eu to fazendo assim:

1  try
2myConnection.Connected := false;
3myConnection.Server := edit3.Text;  //o edit3.text está recebendo um 
valor que não existe

4myConnection.Database := edit5.Text;
5myConnection.Connected := true; //aqui o programa dá o erro

6ShowMessage('1');
  except
7showMessage('Existem dados errados! Favor corrigi-los.');
8close;
  end;


O título da caixa com o erro é o seguinte: Debugger Exception Notification

Se eu tirar a linha 5 ele execulta tudo sem problema, mas não faz os comandos 
do except.

Um abraço a todos!


--- Em delphi-br@yahoogrupos.com.br, Eduardo Silva dos Santos eduardo@... 
escreveu

 Usa um try except no código.
 
 
 Att,
 ...
 Eduardo Silva dos Santos
 DRD SISTEMAS
 (27) 3218-4201
 (27) 9961-7095
 MSN: eduardo@...
 Site: http://www.drdsistemas.com.br/
 ...
 
 
 Em 22 de julho de 2010 10:24, Bruno Lepesqueur
 brunolbra...@...escreveu:
 
 
 
  Galera... estou com um probleminha!
 
  Eu inseri um myConnection (componente do myDAC) em meu formulário e criei
  na
  tela inicial do programa umas opções pra se mudar as configurações desse
  componente myConnection (qdo necessário), mas qdo se coloca uma opção que
  não existe no formulário, tipo um banco de dados que não existe, o sistema
  gera um erro que eu não gostaria que gerasse!
 
  Fiz assim:
  myConnection .Connected := false;
  myConnection .Database := edit5.Text;
  myConnection .Server := edit3.Text;
 
  Qdo o usuário digita no edti3.text um valor de Servidor que não existe, o
  sistema gera um erro.
  A solução que pensei foi a seguinte...
  Qdo o erro for gerado, ao invés de aparecer o erro, fazer um if para enviar
  uma msg tipo um showMessage informando ao usuário que aquele Server não
  existe, mas eu não sei fazer isso!
 
  Seria mais ou menos assim:
 
  if myconnection.server (192.168.0.1) não existir faça isso...
 
  Podem me dar uma dica inicial?
 
  Um abraço!
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 
   
 
 
 
 [As partes desta mensagem que não continham texto foram removidas]





Re: [delphi-br] Re: Solução para MyConnection

2010-07-22 Por tôpico Eduardo Silva dos Santos
Você tem que ignorar essa exception na IDE, faça um teste, compile aquele
código e execute fora do delphi para você ver uma coisa.


Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...


Em 22 de julho de 2010 18:52, brunolbrasil brunolbra...@yahoo.com.brescreveu:



 Pessoal, não ta dando certo!
 Eu to fazendo assim:

 1 try
 2 myConnection.Connected := false;
 3 myConnection.Server := edit3.Text; //o edit3.text está recebendo um valor
 que não existe

 4 myConnection.Database := edit5.Text;
 5 myConnection.Connected := true; //aqui o programa dá o erro

 6 ShowMessage('1');
 except
 7 showMessage('Existem dados errados! Favor corrigi-los.');
 8 close;
 end;

 O título da caixa com o erro é o seguinte: Debugger Exception
 Notification

 Se eu tirar a linha 5 ele execulta tudo sem problema, mas não faz os
 comandos do except.

 Um abraço a todos!

 --- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br,
 Eduardo Silva dos Santos eduardo@... escreveu

 
  Usa um try except no código.
 
 
  Att,
  ...
  Eduardo Silva dos Santos
  DRD SISTEMAS
  (27) 3218-4201
  (27) 9961-7095
  MSN: eduardo@...

  Site: http://www.drdsistemas.com.br/
  ...
 
 
  Em 22 de julho de 2010 10:24, Bruno Lepesqueur
  brunolbra...@...escreveu:

 
  
  
   Galera... estou com um probleminha!
  
   Eu inseri um myConnection (componente do myDAC) em meu formulário e
 criei
   na
   tela inicial do programa umas opções pra se mudar as configurações
 desse
   componente myConnection (qdo necessário), mas qdo se coloca uma opção
 que
   não existe no formulário, tipo um banco de dados que não existe, o
 sistema
   gera um erro que eu não gostaria que gerasse!
  
   Fiz assim:
   myConnection .Connected := false;
   myConnection .Database := edit5.Text;
   myConnection .Server := edit3.Text;
  
   Qdo o usuário digita no edti3.text um valor de Servidor que não existe,
 o
   sistema gera um erro.
   A solução que pensei foi a seguinte...
   Qdo o erro for gerado, ao invés de aparecer o erro, fazer um if para
 enviar
   uma msg tipo um showMessage informando ao usuário que aquele Server não
   existe, mas eu não sei fazer isso!
  
   Seria mais ou menos assim:
  
   if myconnection.server (192.168.0.1) não existir faça isso...
  
   Podem me dar uma dica inicial?
  
   Um abraço!
  
  
   [As partes desta mensagem que não continham texto foram removidas]
  
  
  
 
 
  [As partes desta mensagem que não continham texto foram removidas]
 

  



[As partes desta mensagem que não continham texto foram removidas]





-- 
 FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM 

* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages

* Para falar com o moderador, envie um e-mail para:
delphi-br-ow...@yahoogrupos.com.br
Links do Yahoo! Grupos

* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/

* Para sair deste grupo, envie um e-mail para:
delphi-br-unsubscr...@yahoogrupos.com.br

* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html