Table.Columns[Column : Variant].AutoSize
Установить оптимальную ширину колонки

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

Пример:

Procedure OnAfterRequery;
Begin
  Table.Columns['Name'].AutoSize;
End;

© RTIT