Hola THacker ! 
En el evento OnClick de tu botón incrementa el valor de la propiedad Position del TProgressBar en el valor de la propiedad Step del mismo... Algo así:
Código Delphi [-]ProgressBar1.Position:= ProgressBar1.Position+ProgressBar1.Step;
if ProgressBar1.Position = 100 then
showmessage ('100% completado');
Saludos,
__________________
Ask questions. Think for yourself. Wake up and you’ll make the difference
Última edición por Fenareth fecha: 20-07-2008 a las 04:21:15.
Razón: Agregar código
|