DBGRID 如何高亮显示某一列~ DBGRID 我想在点击DBGRID的标题的时候,让选择的列高亮显示,怎么做??用SelectedField 好象只能高亮一行... 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 可以,不过是你绘制的,不是选中!类似如下:procedure TFrmDealView.dxTreeListDayColVolCustomDrawCell(Sender: TObject; ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean; var AText: String; var AColor: TColor; AFont: TFont; var AAlignment: TAlignment; var ADone: Boolean);begin inherited; ACanvas.Brush.Style := bsSolid; if ASelected then ACanvas.Brush.Color := dxTreeListTime.HighlightColor else ACanvas.Brush.Color := dxTreeListTime.Color; ACanvas.FillRect(ARect); AFont.Color := Fcolorset.Volume; AFont.Size := 11; ACanvas.TextOut(ARect.Left+12,ARect.Top+2, AText); ADone := True;end; 要不哪位大哥提供下有什么GRID的控件支持列选的... 类似EXCEL中的列选中吗?好像DBGrid不支持。 如何隐藏cmbobox的边框,并为其增加下划线 大量插入数据,因会有重复数据,用try异常处理快,还是先select在插入快? ADOConnection断线自动重新连接 快来看啊. 求两日期的相差天数的函数怎么写?betweensday(date1,date2)不对呀+ 这个统计怎么实现呀! 为什么线程不能运行?在线等待 DBGRID如何显示计算值--如合计值、序号等 这条sql语句哪里出错了 问两个有点难度的问题:怎样声明及使用API 和 ActiveX DLL? delphi7自带的DBChart的一个奇怪问题。 合併多個 wav文件為一個文件
procedure TFrmDealView.dxTreeListDayColVolCustomDrawCell(Sender: TObject;
ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode;
AColumn: TdxTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean;
var AText: String; var AColor: TColor; AFont: TFont;
var AAlignment: TAlignment; var ADone: Boolean);
begin
inherited;
ACanvas.Brush.Style := bsSolid;
if ASelected then
ACanvas.Brush.Color := dxTreeListTime.HighlightColor
else
ACanvas.Brush.Color := dxTreeListTime.Color;
ACanvas.FillRect(ARect);
AFont.Color := Fcolorset.Volume;
AFont.Size := 11;
ACanvas.TextOut(ARect.Left+12,ARect.Top+2, AText);
ADone := True;end;