Ir para o conteúdo
  • Revista PROGRAMAR: Já está disponível a edição #57 da revista programar. Faz já o download aqui!

bsntuga

Funçao Randomize!

Mensagens Recomendadas

bsntuga    0
bsntuga

(*
Author : DarkCoderSc
Function To randomise any string =)
*)

Function RandomName : String;
const  Chars = '0123456789ABCDEFGHJKLMNPQRSTUVWXYZ';
var
S: string;
i, N: integer;
begin
Randomize;
S := '';
for i := 1 to 8 do begin
    N := Random(Length(Chars)) + 1;
    S := S + Chars[N];
Result := S;
End;
End;

Funçao muito util por vezes

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!

Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.

Entrar Agora


×

Aviso Sobre Cookies

Ao usar este site você aceita os nossos Termos de Uso e Política de Privacidade