ProgressBar em um SplashScreen
Boa tarde a todos.
Gostaria de saber como faço para colocar um progressbar em um splash Screen enquanto estou inicializando o aplicativo.
Detalhe: O Splash Screen não é o form principal.
Grato pela atenção.
Gostaria de saber como faço para colocar um progressbar em um splash Screen enquanto estou inicializando o aplicativo.
Detalhe: O Splash Screen não é o form principal.
Grato pela atenção.
Turbo Drive
Curtidas 0
Respostas
Bruno_costa
04/09/2003
va no site http://www.lloydsoft.hpg.com.br/dicas.htm.
lá tem umas dica para baixar
espero que ajude.
lá tem umas dica para baixar
espero que ajude.
GOSTEI 0
Nigro
04/09/2003
Aqui vai + - o código mas não aconselho a faazer isso, pois conforme sua base vai ficando maior vai demorar mais ainda para carregar sua aplicação, mas... vamos lá...
ProgressBar1.Min := 0;
ProgressBar1.Max := Table1.RecordCount;
Table1.First;
While not Table1.Eof do
Begin
ProgressBar1.Position := Table1.RecNo;
Table1.Next;
End;
ProgressBar1.Min := 0;
ProgressBar1.Max := Table1.RecordCount;
Table1.First;
While not Table1.Eof do
Begin
ProgressBar1.Position := Table1.RecNo;
Table1.Next;
End;
GOSTEI 0
Nildo
04/09/2003
Conforme cria os formulários, você deve icnrementar um no Position do progressBar, e colocar o Max dele como o numero de formulários.
t+
t+
GOSTEI 0