Socorro !!! texto aleatorio

Question

Galera tenho um arquivo  txt com frasesquero colocar em um painel uma frase aleat�ria toda vez que o usu�rio entrar no sistemameu txt e assimmarcos legalmarcelo testefdasfdsfdasffasdfdsfasdfsdfsdfdsaf...

Cebikyn · Answer

Use:[code:1:14efb0e8a5]case Random(Integer) do  0: Panel1.Caption:=�Texto1�;  1: Panel1.Caption:=�Texto2�;  2: Panel1.Caption:=�Texto3�;  3: Panel1.Caption:=�Texto4�;end;[/code:1:14efb0e8a5]Onde [b:14efb0e8a5]Integer[/b:14efb0e8a5] representa o n�mero de frases que voc� tem menos 1, depois basta copiar as linhas iniciadas por n�meros, tantas vezes quantas sejam necess�rias....

Nildo · Answer

[code:1:f67f4746d5]var   b: TStringList;begin   b := TStringList.create;   b.loadFromFile(�c:suas_frases.txt�);   panel1.Caption := b.strings&#91;Random(b.count-1)&93;;end;[/code:1:f67f4746d5]-------------------Pronto. Soh issuBasta usar criatividade e misturar com um pouco de programa��o....

F�rum Socorro !!! texto aleatorio #172413