La verdad no tengo muy claro lo que quieres lograr, sin embargo me suena a que quizá te sirva recorrer las columnas en el OnResize de la Grid y capturar ese valor que deseas... algo como:
Código Delphi
[-]
for i := 0 to Grid1.columns.count -1 do
begin
end;