problem resize unidbgrid column

[donlego]

hi Farshad..

i have procedure to resize column in grid

procedure Tfrmdefaultlist.rescol;
var
 i: integer;
 acol: integer;
begin
 acol := UniDBGrid1.Columns.Count - 1;
 for i := 1 to UniDBGrid1.Columns.Count - 1 do
 begin
   UniDBGrid1.Columns.Items[i].Width := UniDBGrid1.Width div acol;
 end;
end;

 

but then column in grid no resize..

i use fmsoft_unigui_beta_0.86.0.880_setup.exe

 

thank's

[Farshad Mohajeri]

Logged #1077