[firebase-br] evento onvalidate no IBO
Rafael Rosso Fernandes
rafael em lmsistemas.com.br
Sex Ago 19 13:43:46 -03 2005
na verdade era isso que eu queria...
if AField = SqlCadastro.FieldByName('cep_cli') then
begin
showmessage('teste');
end;
----- Original Message -----
From: "RedDevil" <reddevil em reddevil.eti.br>
To: "FireBase" <lista em firebase.com.br>
Sent: Thursday, August 18, 2005 11:11 PM
Subject: Re: [firebase-br] evento onvalidate no IBO
ola Rafael,
seria algo semelhante a isso ae abaixo...
{ ------
procedure TForm1.qryMedicamentosValidateField(Sender: TIB_Statement;
ARow: TIB_Row; AField: TIB_Column);
begin
If qryMedicamentos.FieldByName( 'datavenc' ).AsDate < Date then
begin
Application.MessageBox('A Data de Vencimento é Inválida... Please,
Trabalhe "De Cara" !!!', 'Vacilo:', MB_ICONERROR);
IB_Edit5.SetFocus;
Exit;
end;
// validaçao dos demais campos
// ...
// ...
// ...
end;
------ }
com as devidas verificaçoes sobre se a TIB_Query esta em inserçao ou em
ediçao, eh possivel validar a entrada de todos os campos que estao na
TIB_Query nesse mesmo evento...
[]s
força sempre.
ate +++
--
Luiz "RedDevil" Stefanski
http://www.RedDevil.eti.br - Delphi 4 Powered by IBObjects
exemplos e dicas sobre o IBObjects:
http://www.firebase.com.br/cgi-bin/firebase.cgi/dnld?ID=165
compilaçao/instalaçao do IBObjects sabor BPG:
http://www.firebase.com.br/cgi-bin/firebase.cgi/artigo?ID=630
Post By Rafael Rosso Fernandes:
> pode me passar um exemplo prático de como utulizar?
>
>
> ----- Original Message ----- From: "RedDevil" <reddevil em reddevil.eti.br>
> To: "FireBase" <lista em firebase.com.br>
> Sent: Thursday, August 18, 2005 10:10 AM
> Subject: Re: [firebase-br] evento onvalidate no IBO
>
>
> ola Rafael,
>
>
>> preciso de um evento semelhante ao onvalidate dos fields do clientdataset
>> no ibo ...não achei nada parecido se não queria usar o evento onexit do
>> component se alguem tiver alguma solução ....
>
>
> se voce analisar bem o IBObjects, vai perceber que muitas coisas que nos
> outros componentes sao feitas nos componentes dataware, no IBObjects sao
> feitas nas TIB_Queries...
>
> esse eh um exemplo... no componente TIB_Query existe o evento
> OnValidateField...
>
>
> []s
> força sempre.
> ate +++
>
> --
> Luiz "RedDevil" Stefanski
> http://www.RedDevil.eti.br - Delphi 4 Powered by IBObjects
> exemplos e dicas sobre o IBObjects:
> http://www.firebase.com.br/cgi-bin/firebase.cgi/dnld?ID=165
> compilaçao/instalaçao do IBObjects sabor BPG:
> http://www.firebase.com.br/cgi-bin/firebase.cgi/artigo?ID=630
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
> Para editar sua configuração na lista, use o endereço
> http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
> Para editar sua configuração na lista, use o endereço
> http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa
>
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa
Mais detalhes sobre a lista de discussão lista