Ir para conteúdo
Fórum Script Brasil
  • 0

Gerador De Senhas (Resolvido)


OSJunior

Pergunta

Olá, gostaria de saber, se é possível escolher kuantos números o usuário quer com ke a senha seja formada.

function GeraSenha (aQuant: integer): string;
var
  i: integer;
const
  str = '1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';
begin
  for i:= 1 to aQuant do
  begin
    Randomize;
    Result := Result + str[Random(Length(str))+1];
  end;
end;
Para testar, adicione no formulário um Button e um Edit. No OnClick do botão, digite o seguinte código:
Edit1.Text := GeraSenha(5); 

user posted image

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

Visitante
Este tópico está impedido de receber novos posts.


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...