Tratar campos not null
Publicado por rafael farias novaes 01/02/2009
[ Hits: 5.312 ]
Homepage: http://www.vivaolinux.com.br/perfil/verPerfil.php?login=bfmano
Download tratar campo not null.txt
Procedure muito útil, para ser utilizada antes de gravar um cadastro.
Procedure ChecarcamposRequeridos(tabela : TDataSet); var i : integer; begin for i := 0 to Pred(tabela.Fields.Count) do begin if (tabela.Fields[i].Required) and (tabela.Field[i].IsNull) then begin ShowMessage('Campo: ' + tabela[i].DisplayLabel + ' precisa ser informado!'); break; end; end; {Seria interessante editar o valor no campo DinplayLabel para melhor aproveitamento da procedure, clicando duas vezes no ClientDataSet, e em seguida no campo, aparece a propriedade DisplayLabel, que deve ser renomeada para o nome do campo. Ex: VL_VENDA, ficaria: Valor da Venda.}
Visualizador de imagem Pascal/Lazarus
Transformação entre as escalas térmicas Kelvin, Fahrenheit e Celcius
Editor de texto em Pascal/Lazarus
Nenhum comentário foi encontrado.
Como agendar um backup automático do PostgreSQL no Cron evitando o problema de senha
Como preparar o Vim/Neovim para corrigir ortografia em português
Dark Web e Malwares na internet, quanto custa?
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Como verificar o hash de um arquivo baixado da Internet e como criar um hash
Debian 12 - IPTABLES - removendo NFTABLES
OverWatch 2 - Abrindo portas do jogo no Iptables.
Como instalar o adaptador wifi USB Intelbras ACtion A1200 no Linux Mint
Como normalizar seus arquivos MP3 para que fiquem no mesmo volume
Tela branca. Como faço para aparecer a imagem novamente? (1)
O que você está ouvindo agora? [2] (129)
[C/C++] BRT - Bulk Renaming Tool
[Shell Script] Criação de Usuarios , Grupo e instalação do servidor de arquivos samba
[Shell Script] Tire screenshots com Scrot facilmente com Zscrot
[Shell Script] DioPSI - Script multidistro para instalar programas
[Shell Script] ARS Vídeos - Cortador de vídeos e webcam shooter