Olá Eduardo
Estou mandando um exemplo de como faço e funciona perfeitamente. É uma
verficação antes de gravar a informação no banco.
if DTM.QRcliente.FieldByName('nome_cliente').IsNull then
begin
MessageBox (Application.Handle, pchar ('O Campo "Nome do Cliente" Está
Em Branco!'), 'ATENÇÃO', MB_DEFBUTTON1);
DBcliente.Setfocus;
exit;
end;
----- Original Message -----
From: "Eduardo Silva ®" <[EMAIL PROTECTED]>
To: "Grupo Delphi-br" <delphi-br@yahoogrupos.com.br>
Sent: Wednesday, December 21, 2005 3:10 PM
Subject: [delphi-br] Testar campos em tabelas
> Galera como eu faço para verificar se determinados campos estão
> preenchidos
> ou não?
>
> if dmSIAEAP01.tblSIAECONFDT_DATAINICIAL.AsDateTime = 0 then
> dInicio := Date
> else
> dInicio := dmSIAEAP01.tblSIAECONFDT_DATAINICIAL.AsDateTime;
>
> if dmSIAEAP01.tblSIAECONFNR_SOMADIAS.AsInteger = 0 then
> iDias := 30
> else
> iDias := dmSIAEAP01.tblSIAECONFNR_SOMADIAS.AsInteger;
>
> To fazendo isso mas não ta dando certo.
>
> uso paradox...
>
> __ __
> / \ /| |'-.
> .\__/ || | |
> _ / `._ \|_|_.-'
> | / \__.`=._) (_
> |/ ._/ |"""""""""|
> |'. `\ | | Eduardo de Almeida Silva
> ;"""/ / | | Kobra Sistemas
> ) /_/| |.-------.| Desenvolvimento de Software
> ' `-` ' " "
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
--
<<<<< 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:
[EMAIL PROTECTED]
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:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
