Como mandar el tamaño de una columna desde codigo en fast report

[Lupita]

Hola tengo un problema estoy mandando este query (select clave,nombre, ciudad from clientes)a imprimir en un reporte de fast report pero como el nombre esta muy largo me lo manda con un tamaño predeterminado, me sale en dos renglones y quiero mandarle el tamaño por codigo, pero no se como mandarlo, uso esto para mostrar la informacion

procedure frxReport1BeforePrint(c: TfrxReportComponent);
var
Cross: TfrxCrossView;
i, j: Integer;
begin
MQuery1.open;
if c is TfrxCrossView then
begin
Cross := TfrxCrossView(c);
i := 0;
while not MQuery1.Eof do
begin
for j := 0 to MQuery1.Fields.Count - 1 do
begin

Cross.AddValue([i], [MQuery1.Fields[j].DisplayLabel], [MQuery1.Fields[j].AsString]);
end;
MQuery1.Next;
Inc(i);
end;
end;

end;

Espero que me puedan ayudar