PDA

View Full Version : تغییر رنگ ستون های DBGrid


محسن شمس
جمعه 15 مهر 1384, 22:32 عصر
آقا چه جوری میشه ستون های dbgrid را رنگی کرد

هر ستون را مثلا یه رنگ کنیم
vcldeveloper
شنبه 16 مهر 1384, 03:12 صبح
از رویداد OnDrawColumnCell استفاده کن، مثال:


procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if (DataCol mod 2) = 0 then
TDBGrid(Sender).Canvas.Brush.Color := clRed
else
TDBGrid(Sender).Canvas.Brush.Color := clBlue;
TDBGrid(Sender).DefaultDrawColumnCell(Rect,DataCol ,Column,State);
end;
محسن شمس
شنبه 16 مهر 1384, 06:58 صبح
اقا چرا این جوری میشه

یه رکورد خودش اضافه می کنه
amehrabi
شنبه 16 مهر 1384, 07:25 صبح
می تونی در خاصیت coloumn از DBGrid ، هر ستون را انتخاب کنی و رنگ اون رو تغییر بدی
vcldeveloper
یک شنبه 17 مهر 1384, 02:53 صبح
اقا چرا این جوری میشه

یه رکورد خودش اضافه می کنه
در هر دو تصویر فقط 5 رکورد وجود داره...مسئله اینکه شما برای ستون ها رنگ روشن انتخاب کردید، رنگ متن در هنگام انتخاب کردن یک رکورد هم سفید هست و شما نمی تونید متن سفید در پس زمینه روشن رو بخونید.