Buenas, os comento
he probado las dos maneras la respuesta de ecfisa me da error en la declaracion del procedimiento Paint. Y he probado la respuesta de AgustinOrtu que no me da error en la declaracion de la clase TStringGrid pero me da el siguiente error:
Código Delphi
[-][dcc32 Error] Empresas.pas(16): E2137 Method 'Paint' not found in base class
Uso Delphi xe7 ¿tiene algo que ver?