D devexpress Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-20 #1 如何把dbgrid的某两列(3列和第4列之前的那跟线)分隔线用clred颜色表示。 在oncallcolumn事件里怎么做.
M my_first1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-20 #2 if column.index=4 Then begin TDBGrid(Sender).Canvas.Pen.Color := clRed; TDBGrid(Sender).Canvas.MoveTo(Rect.Left, Rect.Top); TDBGrid(Sender).Canvas.LineTo(Rect.Left, Rect.Bottom); end;
if column.index=4 Then begin TDBGrid(Sender).Canvas.Pen.Color := clRed; TDBGrid(Sender).Canvas.MoveTo(Rect.Left, Rect.Top); TDBGrid(Sender).Canvas.LineTo(Rect.Left, Rect.Bottom); end;