• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

bsntuga

Funçao Randomize!

1 mensagem neste tópico

(*
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

0

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