Alguem pode ajudar um simples iniciante?
[color=darkblue:ac665425fa]Eu queria saber como faz pra colocar uma barra de rolagem, para contar de 0 a 5 segundos. Por expemplo: eu to criando meu primeiro software durante o curso q eu to fazendo só que nó ainda estamos no começo e não aprendemos quase nada, hehe... Se vocês puderem me ajudar, eu fico grato![/color:ac665425fa]
Bruno Andrade
Curtidas 0
Respostas
Dbergkamps
10/04/2004
se vc quer que a barra de rolagem role até o final em 5 segundos faça isso:
coloque uma barra de rolagem e um timer
no evento on timer coloque:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if ScrollBar1.Position<>100 then
ScrollBar1.Position:=ScrollBar1.Position + 20
else
begin
Application.MessageBox(´Chegou ao Final´, ´Fim´, MB_OK + MB_ICONINFORMATION);
Timer1.Enabled:=false;
end;
Lembrando:
A propriedade Max deve estar setada como 100;
Se não for isso, explique-se melhor...
end;
coloque uma barra de rolagem e um timer
no evento on timer coloque:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if ScrollBar1.Position<>100 then
ScrollBar1.Position:=ScrollBar1.Position + 20
else
begin
Application.MessageBox(´Chegou ao Final´, ´Fim´, MB_OK + MB_ICONINFORMATION);
Timer1.Enabled:=false;
end;
Lembrando:
A propriedade Max deve estar setada como 100;
Se não for isso, explique-se melhor...
end;
GOSTEI 0
Bruno Andrade
10/04/2004
Eita! To ficando louco! Eu confundi o nome! :D É barra de progresso! Desculpa ae!
GOSTEI 0
Bruno Andrade
10/04/2004
[color=darkblue:1522c58c2a][quote:1522c58c2a=´Bruno Andrade´]Eita! To ficando louco! Eu confundi o nome! :D É barra de progresso! Desculpa ae![/quote:1522c58c2a][/color:1522c58c2a]
GOSTEI 0
Dbergkamps
10/04/2004
beleza, cara
basta substituir o scroll bar pelo progress bar 1,
Obs.: Se vc, como eu, está no primeiro software, use os componentes do Flat Style, eles são demais.
Vc pode baixa-los no www.delphi.eti.br
Feliz Páscoa
basta substituir o scroll bar pelo progress bar 1,
Obs.: Se vc, como eu, está no primeiro software, use os componentes do Flat Style, eles são demais.
Vc pode baixa-los no www.delphi.eti.br
Feliz Páscoa
GOSTEI 0