Criando Gerador de Senha
2 participantes
:: Programação :: Delphi :: Delphi Tutoriais.
Página 1 de 1
Criando Gerador de Senha
Gerador de Senha
Adicione na Form:
De 2 clicks no button, apague tudo e coloque:
max=10; é o numero de letras na senha gerada.
Abraços !
Adicione na Form:
- 1 Edit [palheta Standard]
- 1 Button [ idem ']
De 2 clicks no button, apague tudo e coloque:
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
const
str='1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ';
max=10;
begin
Randomize;
Edit1.Text:='';
for i:=1 to max do
begin
Edit1.Text:=Edit1.Text+str[random(length(str))+1];
end;
end;
end.
max=10; é o numero de letras na senha gerada.
Abraços !
Mr.Positive- Membro
- Mensagens : 40
Agradecimentos : 0
Data de inscrição : 12/01/2011
Idade : 29
Localização : Recreio
Humor : Feliz !
Re: Criando Gerador de Senha
ctrl+c,ctrl+v
amigo...poste Ss para ajudar os membros a criarem os projetos
amigo...poste Ss para ajudar os membros a criarem os projetos
Vidaama- Bronze Member
- Mensagens : 152
Agradecimentos : 11
Data de inscrição : 13/02/2011
Idade : 27
Tópicos semelhantes
» Criando Gerador de CPF
» Criando um Gerador de Cash Simples
» [Gerador] xXLiipeeXx - Gerador de Cash
» [ajuda] com senha
» Colocando Sistema de Login e Senha
» Criando um Gerador de Cash Simples
» [Gerador] xXLiipeeXx - Gerador de Cash
» [ajuda] com senha
» Colocando Sistema de Login e Senha
:: Programação :: Delphi :: Delphi Tutoriais.
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
|
|