هر یک ستونهای یک ستون DBGrid از 200بیشترنشود!

[ali_abbasi22145]

سلام
من می خواهم که با کدنویسی اگر طول (Width) هر یک ستونهای DBGrid از 200 بیشتر شدآنوقت Width آن ستون را به اندازه 200 کند.
به شکل زیر توجه کنید

[Mahmood_M]

می تونید هر لحظه ( با یک تایمر ) یا در مواقعی خاص چک کنید که اندازه از 200 بیشتر نباشه ، اگه بود اون رو روی 200 تنظیم کنید ... !!

موفق باشید ...

[mzjahromi]

میخواهید در هر لحظه کاربر نتونه ستون رو از 200 بزرگتر بکنه؟

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if column.Width>200 then
Column.Width:=200;
end;

[ali_abbasi22145]

سلام و تشکر از دوست گرامی خودم
حال بخواهم DBGrid وسط چین شود چه باید کرد؟

[mzjahromi]

میشه منظورتون از وسط چین رو بیشتر توضیح دهید؟
سلولهای گرید یا خود گرید توی فرم یا ؟؟؟

[SYNDROME]

با سلام
کاربر گرامی در هر تاپیک یک سوال را مطرح کنید.
برای اطلاعات


DBGrid1.Columns[0].Alignment := taCenter;

برای Title


DBGrid1.Columns[0].Title.Alignment := taCenter;

موفق باشید

[ali_abbasi22145]

میشه منظورتون از وسط چین رو بیشتر توضیح دهید؟
سلولهای گرید یا خود گرید توی فرم یا ؟؟؟

سلام
وسط چین برای
اولا:تمام سلولهای گرید
ثانیا: تمام عنوانهای فیلدهای گرید (نام ستون)

خود گرید توی فرم را نمی خواهم.

[mzjahromi]

پس همون کدی که دوستمون نوشتن

[ali_abbasi22145]

مرسی دوستان
با این حل شد.
Column.Alignment := taCenter;
Column.Title.Alignment := taCenter;