reducir tamaño de columnas en un DBGrid

[boreg]

Saludos, prueba con la propiedad width seria algo asi

Código Delphi [-]
var a :Integer;
for a := 0 to DBGrid.columns.count - 1;
  DBGrid.Columns[a].Width:=100;

por supuesto que podrias indicar a cada columna un ancho diferente pero ya tu sabras como usarlo.
Y si para imprimir creo que tienes que usar el Dataset que tienes vinculado a tu DBGrid, prueba con los componentes para reportes, y si tienes dudas o problemas por aqui estaremos para ayudarte.