alClient برای ستونهای DBGrid ??

[Mojgan110]

سلام.

اگر بخواهیم که سایز ستونهای DBGrid بصورت خودکار تغییر کنند ، چه کار باید بکنیم. ؟؟
بطوریکه وقتی سایز خوده DBGrid با تغییر سایز فرم ، تغییر میکنه ، ستونهای DBgrid هم تغییر سایز بدهند و همیشه کل فضای Dbgrid را پر کنند ( مثل حالت alClien )

ضمنا از DbGird های InfoPower هم استفاده کردم . این را گفتم که شاید امکانات خاصی واسه این کار داشته باشه.


از اینکه سوالم ابتدایی بود عذر میخوام. http://www.kolobok.wrg.ru/smiles/he_and_she/girl_sad.gif

[MNosouhi]

http://www.123coder.com/delphi_database_autosize_a_dbgrid-column_to_fit_its_contents.htm

غیر از این هم قبلا آقا میثم کدش رو گذاشته بود.

[Mojgan110]

http://www.123coder.com/delphi_database_autosize_a_dbgrid-column_to_fit_its_contents.htm

غیر از این هم قبلا آقا میثم کدش رو گذاشته بود.

با تشکر. من کلمه "ستون" را سرچ کردم قبل از ایجاد تاپیک ، ولی به نتیجه ای نرسیدم.

کدی که شما لطف کردین ، مربوط به اینه که چجوری سایز ستونها با طول متنی که میخواد داخلشون نشان داده بشه ، هماهنگ بشه

که این ، چیزی که من پرسیدم نیست

[mzjahromi]

ببین این کد بدردت میخوره


procedure TForm1.FormResize(Sender: TObject);
var
i,T:Integer;
begin
T:=0;
For i:=0 To DBGrid1.Columns.Count-1 Do
T:=T+DBGrid1.Columns[i].Width;
T:=T+34;
For i:=0 To DBGrid1.Columns.Count-1 Do
DBGrid1.Columns[i].Width:=DBGrid1.Columns[i].Width*DBGrid1.Width div T;
end;