Cómo usar TcxProgreesBar

[tempto]

Me sirve el comentario Al González, pero con la barra clásica utilizo el evento onWork del componente TIdFTP para rellenarla, pero con el cx no puedo, este es el código que uso:

Código Delphi [-]
procedure TMain.FTPWork(ASender: TObject; AWorkMode: TWorkMode;
  AWorkCount: Int64);
begin
  barra.Position := AWorkCount div 1024;
end;

[[Al González]]

¿Te aparece algún mensaje de error? ¿Cuál? Por favor detalla el problema para que se te pueda brindar mejor ayuda.

[tempto]

Nop, no aparece ningún mensaje, simplemente la barra se queda vacía, ni se inmuta

[tempto]

Ya está solucionado, sólo era que el componente tarda más en empezar a aparecer el progreso. Gracias por la ayuda Al González
Perdón por el doble posteo, pero no sé cómo editar mi mensaje