Gauge y Arreo

[[Bicho]]

Hola JoeyJordison,

Antetodo bienvenido al ClubDelphi. Te recomiendo te leas la Guía de Estilo de los foros, revisa tambien éste hilo, ya que es muy importante poner títulos significativos y descriptivos a los hilos para una mejor búsqueda posterior.
Por último, estás haciendo, a mi parecer, dos preguntas totalmente distintas entre sí, y para ello debes iniciar un hilo diferente.

Así pues, voy a intentar ayudarte con tu primera pregunta.
Para hacer avanzar a un TGauge, revisa sus propiedades: MaxValue y
Progress.
- La primera sirve para darle un valor máximo que pueda alcanzar la barra de progreso. Por ejemplo si estás trabajando con varios registros de una tabla y tienes que hacer algo con cada uno de ellos; deberías asignar el número total de filas a modificar al MaxValue, cuando hayas creado la consulta inicial.

Código Delphi [-]
Gauge1.MaxValue := Query1.RecordCount - 1;

- El segundo, sirve para hacer avanzar la barra. Siguiendo con el caso anterior, cada vez que avanzas por un registro, incrementas el valor de esa propiedad y veras como la barra avanza hasta el MaxValue.

Código Delphi [-]
Gauge1.Progress := Gauge1.Progress + 1;

Espero te sirva, y ua vez más, bienvenido al club.

Saludos