Muito bom, Eduardo!!! Usei essa segunda forma, ficou mais elegante e deu certinho! Obrigado e um grande abraço....
Fernando Interbrasileira Eduardo Silva dos Santos escreveu: > > Olá "*Interbrasileira"* > ** > Eu novamente... vc pode fazer de forma direta também... > > procedure TDados.FormShow(Sender: TObject); > Begin > BitBtn4.Visible := TblCliente.FieldByName( 'Dt_Cadastro' > ).AsDateTime > StrToDate( '09/10/2007' ); > //Note que o simple fato de comparar o campo com a data ja retorna > true ou false, logo vc não precisa necessariamente do IF > //agora se tiver mais código para a condição ai sim, use o IF. > > end; > >
