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