Re: [delphi-br] Anderson, fiz assim mas não d eu

Mil desculpas falei sem testar !!! Você tem toda razão, com o zero também funciona !!! Eduardo Desenvolvimento (Anderson) escreveu: > > nada a ver... > a intenção de colocar POSICAO := 0 é justamente pra dar um intervalo > pra se ler o primeiro caracter... > senão, já começa aparecendo, daí fic

Re: [delphi-br] Anderson, fiz assim mas não d eu

Assim vai funcionar. procedure TForm1.Timer1Timer(Sender: TObject); begin label1.caption := copy(texto,1, posicao); inc(posicao) ; if posicao > length(texto) then posicao := 1; end; procedure TForm1.FormCreate(Sender: TObject); begin texto := 'Olá mundo!'; posicao := 1;