[Delphi] (7 Aula) Randomização de strings e links.

Bom, gente nessa aula aqui vocês vão aprender a usar uma função bem interresante, nessa você vai poder randomizar a escolha de links ou de frases e palavras,por exemplo:"Eu quero que meu programa escolha entre umas dessas 3 frases:
1:Sou Forte.
2:Sou Otário.
3:Não sei o que escrever.
"O programa irá lançar um número entre 1 e 3 e o que cai vai mostrar a mensagem do número pegado.Vamos por mão na massa: No código abaixo vou randomizar 2 frases

Código:


var
L:String
NA:Integer;
begin
NA:=random(2);
case of NA:
1:L:="Eai mano, troll na parada.";
break;
2:L:="Eai mano, fuck yeah na parada.";
break;


É só isso, é muito simples não é?
Então é isso galera, até mais, uma boa noite a todos!E até a próxima aula, nessa vamos aprender a identificar que teclas foram apertadas!