Tratar campos not null
Publicado por rafael farias novaes 01/02/2009
[ Hits: 5.616 ]
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.}
calcular o percentual de pessoas que sao maiores de idade
Nenhum comentário foi encontrado.
IA Turbina o Desktop Linux enquanto distros renovam forças
Como extrair chaves TOTP 2FA a partir de QRCODE (Google Authenticator)
Linux em 2025: Segurança prática para o usuário
Desktop Linux em alta: novos apps, distros e privacidade marcam o sábado
IA chega ao desktop e impulsiona produtividade no mundo Linux
Atualizando o Fedora 42 para 43
Como saber se o seu e-mail já teve a senha vazada?
Como descobrir se a sua senha já foi vazada na internet?
Instalação dualboot Windows 11 e Debian 13 (0)
Programa fora de escala na tela do pc (33)
Eu queria adicionar a incon do wifi e deixa transparente no fluxbox no... (0)









