Fórum É possível colocar PassWord dentro da coluna de TDBGrid? #223219
30/03/2004
0
Gostaria de saber se é possível colocar PassWord dentro da coluna de TDBGrid? Quero dizer, tem como mostrar ´********´ da coluna de TDBGrid? Sei que a propriedade PassWord de TDBGrid não existe, mas há solução para isso...? É nisso que me falta...
Valeu pela ajuda.
Rsballoussier
Curtir tópico
+ 0Posts
30/03/2004
Aroldo Zanela
Possível é, mas não tem sentido, imagine uma coluna de password só ocupando uma coluna com ´*********´. Acho mais aconselhável deixar a coluna invisível.
Gostei + 0
30/03/2004
Rsballoussier
Mas eu quero assim mesmo mostrar ´*********´ na coluna de TDBGrid.
Tem dica para isso?
Passe para mim!
Abraços.
Gostei + 0
30/03/2004
Aroldo Zanela
Deixe a coluna de password invisível, crie um campo calculado e no OnCalc fields faça algo como:
MonteAsterisco := ´**********´;
Gostei + 0
30/03/2004
Rsballoussier
Valeu pela força.
Gostei + 0
01/04/2004
Phsm
No Evento na Query , OnCalcFields coloque o código
Query.FieldByName(´Nome do Campo Calculado´).AsString := ´*******´
Espero ter ajudado !!! :lol:
Gostei + 0
01/04/2004
Rsballoussier
Vou esclarecer melhor:
Uma tabela tem 3 campos: LOGIN, SENHA e NIVEL.
Coloco um TDBGrid no form e já colocados os campos prontos.
A tabela tem alguns registros e quero que o campo SENHA não mostra os caracteres a mostra, mas transformando em ´***********´.
Em vez de:
LOGIN SENHA NIVEL
admin koero True
carmem amor True
tania capetao False
O resultado seria assim:
LOGIN SENHA NIVEL
admin ***** True
carmem **** True
tania ******* False
Entendeu tudo, estimado colega?
Tem dica pra isso? Daí-me força!!!
Valeu pela ajuda!
Gostei + 0
02/04/2004
Fabio.hc
Tente assim:
Como foi dito, vc cria um campo calculado:
vc omite o campo senha e mostra no dbgrid o campo calculado.
procedure TForm1.Table1CalcFields(DataSet: TDataSet); begin Table1SenhaCalc.Value:=tbReplChar(´*´,length(trim(Table1Senha.Value))); end; function tbReplChar(const Ch: Char; const Len: integer): string; var I: integer; begin SetLength(Result, Len); for I := 1 to Len do Result[I] := Ch; end;
Uma função para colocar a quantidade de * de acordo com a senha.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)