Todos os créditos que vou colocar aqui são do seu xará o mestre Bruno Lichot
de uma olhada nos exemplos dele que você vai entender melhor no final tem o
link dele para você baixar exemplos que serão bem úteis ao seu aprendizado e
dúvidas..
Abraços,
Daniel.
*> //algumas informações que podem ser obtidas do application}
>
> //Sugestao de tratamento de erro de campo não preenchido e valores
> invalidos
> if Pos(UpperCase('must have a value'), UpperCase(E.Message)) <> 0 then
> begin
> Pos1:=Pos('''', E.Message);
> mensagem:=E.Message;
> Delete(mensagem, Pos1, 1);
> Pos2:=Pos('''', mensagem);
> mensagem:=copy(E.Message, Pos1 + 1, Pos2 - Pos1);
> mensagem := 'É obrigatório o preenchimento do campo '+ mensagem + '.';
> showmessage(mensagem);
> end
> Bruno Lichot - HTTP://cc.codegear.com/author/795118*
2009/2/4 Bruno Lepesqueur <brunolbra...@yahoo.com.br>
> Obrigado a todos!
>
> Eu não uso o ClienteDataSet.
> Acho q terei q optar pela dica do Daniel, mas eu não sei usar o
> ApplicationEnvents pra esse tipo de operação!
> Se puderem me ajudar o campo já está como required = true
>
> -------Mensagem original-------
>
> De: Daniel Sobrinho Laporte
> Data: 02/04/09 14:37:58
> Para: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>
> Assunto: Re: Re: [delphi-br] Erro qdo campo Null
>
> Bruno para tal, o seu campo deve estar marcado como required = True no seu
> Fields Editor dai esta validação é feita automaticamente, caso o seu
> sistema
> vá dar o post e o campo esteja nulo o seu sistema irá gerar um erro ( e não
>
> será dado o apply no seu banco), é possível capturar esse erro e tratá-lo a
>
> partir do componente ApplicationEvents e no caso ficaria tratado já na
> aplicação inteira. Com este componente você consegue obter a mensagem de
> erro e personalizar conforme seu gosto dando algo do tipo :
> ShowMessage('Campo x não pode ser nulo !"), é importante saber que através
> do e.Message que ele recebe como parâmetro você pode capturar inclusive o
> nome do campo. Bom se entendi bem, acho que isso pode te ajudar
>
> 2009/2/4 Bruno Lepesqueur
> <brunolbra...@yahoo.com.br<brunolbrasil%40yahoo.com.br>>
>
>
> > Eu não estava querendo fazer esse tipo de restrição ao sair do dbEdit e
> > nem
> > criando ela no botão gravar (bitbtn1).
> > Oq eu gostaria mesmo de saber é se existe no delphi algum comando que
> > cancelasse o post (a gravação da tabela) se algum campo não estiver
> > preechido e estiver configurado como não nulo!
> >
> > Obrigado!
> >
> > -------Mensagem original-------
> >
> > De: Ricardo César Cardoso
> > Data: 04/02/2009 11:35:50
> > Para: delphi-br@yahoogrupos.com.br
> > <delphi-br%40yahoogrupos.com.br><delphi-br%
> 40yahoogrupos.com.br>
> > Assunto: Re: [delphi-br] Erro qdo campo Null
> >
> > Na verdade esse código é que informa a restrição... o que vc quer é
> mostrar
> > uma mensagem mais "amigável" para o seu usuário, não é?
> >
> > Um exemplo super-hiper-mega-simplista e não muito recomendável seria
> fazer
> > essa consistência no evento OnExit desse teu dbEdit, como abaixo:
> >
> > [code]
> > TForm1.dbEdit1Exit( // ... conteúdo omitido );
> > Begin
> > if (Length(Trim(dbEdit1.Text)) = 0 ) // vejo se o campo está vazio.
> > ShowMessage("O campo não pode ser nulo!");
> > End;
> > [/code]
> >
> > Como já escrevi anteriormente, essa é a maneira mais simples e acredito
> que
> > não seja a mais recomendada de se fazer. Mas já é uma luz no final do
> > túnel.
> > Como estou sem o Delphi pra testar, improvisei de cabeça o que faria (por
>
> > isso digo que esta não é a melhor solução ou a mais indicada)
> >
> > []'s
> > Ricardo.
> >
> > __________________________________________________________
> >
> > "Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!"
> >
> > --- Em qua, 4/2/09, Bruno Lepesqueur
> > <brunolbra...@yahoo.com<brunolbrasil%40yahoo.com>
> br<brunolbrasil%40yahoo.com.br>>
> > escreveu:
> >
> > Bom dia pessoal!
> >
> > Eu tenho no banco de dados um campo que não pode receber null. O problema
> é
> >
> >
> > que na aplicação do delphi qdo eu não digito nada, ou seja, deixo o
> dbEdit1
> >
> >
> > text (que faz referência à esse campo que não pode aceitar null) em
> branco
> > o
> >
> > sistema dá uma msg de erro informando que o campo não pode ser nulo.
> >
> > Existe algum código que informe uma msg para o usuário dizendo que o
> campo
> >
> > não pode ser nulo para não aparecer esse erro?
> >
> > Obrigado!
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > Veja quais são os assuntos do momento no Yahoo! +Buscados
> > http://br.maisbuscados.yahoo.com
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
>
> --
> Abraços,
>
> Daniel.
>
> "Sempre que a vida lhe apresentar um desafio, tenha certeza que junto dele
> está a solução",
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
--
Abraços,
Daniel.
"Sempre que a vida lhe apresentar um desafio, tenha certeza que junto dele
está a solução",
[As partes desta mensagem que não continham texto foram removidas]
