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 * 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
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
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
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