Table.Columns.AutoSize
Установить оптимальную ширину всех колонок.

Метод Table.Columns.AutoSize устанавливает ширину для всех колонок так, что бы в них помещался весь текст.

Пример:

Procedure OnAfterRequery;
Begin
  Table.Columns.AutoSize;
End;

© RTIT