一个小的问题 TDBCtrlGrid 是继承于 TWinControl 的,对 TDBCtrlGrid 控件使用 GetDC 得到 TDBCtrlGrid 控件的 HDC,然后再用 Windows API 画图就行了,当然用 TCanvas也是可以的, TCanvas.Handle 就是 HDC 类型。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 看样子你是位高手, 因为我对api编程不太熟悉, 您能不能讲得更具体一些,谢了! var MyHDC: HDC; MyCanvas: TCanvas; MyDraw: TGraphic;begin MyHDC := GetDC(DBCtrlGrid1.Handle); MyCanvas := TCanvas.Create; MyDraw := TBitmap.Create; MyCanvas.Handle := MyHDC; MyDraw.LoadFromFile('你的图片文件名'); MyCanvas.Draw(0, 0, MyDraw); MyDraw.Free; MyCanvas.Free; ReleaseDC(DBCtrlGrid1.Handle, MyHDC);end; 那就要自己继承 TDBCtrlGrid 了,自己做一个自定义的控件吧。也可以在显示其他数据前先画啊~ 其实,它在显示数据时都要重画整个表。要解决这个问题得重载它的这个操作。有一些麻烦,不如去找个能实现它的控件,如 ExpressQuantumGrid,在 www.inprises.com 可以下载。 UP it again with Nizvoo 在菜单项的onclick中如何判断是否按住了shift键 相信您能够帮助我,询问关于上手学习的建议,不想走更多的弯路 to:pankun(剑神一笑) 能帮忙 谢谢原代码吗? 我想用postmessage关闭某个窗口,代码怎么写呀? 窗体问题,帮忙解决,谢谢. 如何在query控件中动态添加一个lookup字段 关于ToolBar的自定义问题 用Spcomm控件接收数据时,怎么判断数据接收完成? 屏幕取词delphi源码 请问什么叫VxD?不要笑我,我真的不知道。 请问各位大虾怎样动态改变报表的每列的宽度呢? 请问如何更改窗体的标题栏和最大化/最小化/关闭按钮啊?
MyHDC: HDC;
MyCanvas: TCanvas;
MyDraw: TGraphic;
begin
MyHDC := GetDC(DBCtrlGrid1.Handle);
MyCanvas := TCanvas.Create;
MyDraw := TBitmap.Create; MyCanvas.Handle := MyHDC;
MyDraw.LoadFromFile('你的图片文件名');
MyCanvas.Draw(0, 0, MyDraw);
MyDraw.Free;
MyCanvas.Free;
ReleaseDC(DBCtrlGrid1.Handle, MyHDC);
end;