How to calc max width of memoview (without autowidth)

irw10062

I'm create dynamic (runtime) report,


tmp := TfrxMemoView.Create(last.Parent);
tmp.CreateUniqueName;
tmp.Font.Name := 'Courier New';
tmp.Font.Size := 8;
tmp.ShiftMode := smDontShift;
tmp.AutoWidth := False;
tmp.WordBreak := False;
tmp.WordWrap := False;
tmp.tag := 1;

tmp.DataSet := frxDBDataset1;
tmp.DataField := ZQuery1.Fields[y].DisplayName;

if this ZQuery1.fields[y].Size is 20 --> field size in integer,
how to get / calculate tmp.width of TfrxMemoView (maximum width),
so if i got maximum width of memoview i want to set manual :

tmp.SetBounds(left, last.Top, width, last.Height)

i'm not use autowidth because i create more than 1 column.

thanks for respond

gpi

Try to use TfrxMemoView.CalcWidth function. But you must set text in TfrxMemoView (go to through all records from your dataset and calculate max width)

irw10062

gpi wrote: »

Try to use TfrxMemoView.CalcWidth function. But you must set text in TfrxMemoView (go to through all records from your dataset and calculate max width)

oh great... now i can print table direct fastest without use cross tab.

Tq