panel siempre visible

[RebeccaGL]

tengo una tabla con mil registros, cuando recalculo toda la tabla habro un panel con un gaugebar, pero, el problema es que caundo me voy hacer otra cosa como mirar otra programa el panel con el gaugebar queda en blanco, he puesto panel1.refresh, gaugebar.refresh pero igual con solo poner una ventana ensima de mi panel de estado este se pone en blanco y parece que mi programa se colgo.

Como puedo hacer para que se vea siempre el panel con con el gaugebar, y no se pongan en blanco, para que el usuario vea en donde se encuentra el proceso de recalculo de la tabla.

Código Delphi [-]
    Gauge_STATUSBAR.Progress := 0;
    Query1.First;
    while not (Query1.Eof) do
    begin
      Panel_STATUS.Refresh;
      Calcular_Valores
      Query1.Next;
      Gauge_STATUSBAR.Progress := Gauge_STATUSBAR.Progress + 1;
    end;

saludos.