PDA

View Full Version : رنگ کردن ستون dbgrid



Delphi7_love
جمعه 14 آبان 1389, 12:13 عصر
چطور میشه یک ستون از dbgrid رو رنگ کرد؟

Felony
جمعه 14 آبان 1389, 12:47 عصر
تو بخش بانک های اطلاعاتی چندین و چند بار بحث شده و نمونه کد قرار داده شده : این لینک (http://www.google.com/custom?hl=en&client=google-coop&cof=FORID%3A13%3BAH%3Aleft%3BCX%3A%25D8%25A8%25D8% 25B1%25D9%2586%25D8%25A7%25D9%2585%25D9%2587%2520% 25D9%2586%25D9%2588%25DB%258C%25D8%25B3%3BL%3Ahttp %3A%2F%2Fwww.google.com%2Fintl%2Fen%2Fimages%2Flog os%2Fcustom_search_logo_sm.gif%3BLH%3A30%3BLP%3A1% 3BVLC%3A%23551a8b%3BDIV%3A%23cccccc%3B&adkw=AELymgWrp6f3Nb96l62Lv1_gZbGTA725pIIOVmKxLeXAC Ca5GbiPtnB1CEptIIyW_gBRcWLgI7EZb_gRRC6SRufOEY6Zjsd _Wz8tpZvOL09-7ygtew1GmCXsZ3zzWxiY6fXafKSw0mjz&boostcse=0&q=%D8%B1%D9%86%DA%AF+dbgrid&btnG=Search&cx=010277259273172057471%3Agbud9yj2nhi)

این هم یه نمونه کد که قبلا قرار داده بودم ، کد زیر رو در رویداد OnDrawColumnCell شئ DBGrid مورد نظرتون بنویسید :

With DBGrid1.Canvas.Brush do
begin
if ADOTable1.RecNO mod 2 = 0 then
Color:= ClRed
else
Color:= ClBlue;
end;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol,Column, State);

البته اون لینک ها و کد بالا در مورد رنگ کردن سطر هست ولی خودتون میتونید برای رنگ کردن ستون تغییرش بدید .

pezhvakco
جمعه 14 آبان 1389, 18:01 عصر
جستجو سریع ترین راه است ؟
این یادداشت رو از همین سایت گرفتم بخون :