como colocar senha em campo

[Jair Paes]

Gostaria de saber como faço para colocar senha em um campo no momento da modificação, ou no momento da venda( o vendedor só pode dar desconto com senha do gerente). u

[Gustavo]

Olá,

Você poderia chamar o formulário de login e liberar o desconto apenas quando for determinado usuário que esteja se logando, sem precisar se preocupar com a senha.

[Gilberto]

Exemplo se o Usuario não for master.

Só o master pode cancelar baixas, se não for o master será solicitada senha.

Att
Gilberto



Procedure TFormRecibos.ButtonCancelaBaixaClick(Sender: TObject);
begin
if VNivel then
begin

if (TabGlobal.DRecibos.PAGO.Conteudo = 'S') or (TabGlobal.DRecibos.ANTECIPADO.Conteudo = 'S') then
begin
if not LiberaAcesso(92, 1) then // usuário possui acesso ?
Abort; // acesso negado, retorna ...
FormCancelaBaixa := TFormCancelaBaixa.Create(Application);
try
FormCancelaBaixa.EditContrato.Value := TabGlobal.DRecibos.CODCON.Conteudo;
FormCancelaBaixa.EditVencto.DateValue := TabGlobal.DRecibos.VENCTO.Conteudo;
FormCancelaBaixa.ShowModal;
finally
FormCancelaBaixa.Free;
end;
end
else
MessageDlg('Recibo não Baixado !', mtError, [mbOk], 0);

end;
end;