Bueno, deduzco que para llenar el StringGrid utilizas un bucle, ¿no? un for, un while o un repeat.
Pues coloca una TProgressBar, dale a su propiedad Max el número de iteraciones del bucle (esto es, las veces que se repite) y cada vez que el bucle se ejecute una vez, pues pones una de estas tres cositas:
Código Delphi
[-]
ProgressBar.StepIt; ProgressBar.Position:=ProgressBar.Position;
Inc(ProgressBar.Position);
Y después, si mal no recuerdo, para que se vea el efecto tienes que llamar al método Refresh o Repaint (no recuerdo bien
) del Form donde esté o el suyo propio (el de la progressbar, digo).
Espero que te sirva de ayuda. Y mira en la ayuda de Delphi para más información.
Saludos.
Por cierto... ¡¡¡bienvenido al club!!!. Dale un repaso a la guía de estilo (esto de la barra de progreso ya está muy visto
)
(vaya, yo dando la bienvenida a alguien...
)