DBGrid中,怎么样用鼠标右键选中! 我用左键点中,在ADOQuery1中能得到一个数据用右键点,好象没有得到选种的数据!有什么方法? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 好象点在有数据的表格上,没有DBGrid1MouseDown消息 就是,我的DBGrid连接着一个数据库,有数据,我想用鼠标右键点一个数据,得到所点的数据,但是现在点在数据上,连MouseDown的消息都没有(点在DBGrid的没数据地方有Mousedown消息)。我的问题就是:点鼠标右键能得到所在数据 自己做个dbgrid,继承出MouseDown即可unit MyDBGrid;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids;type TMyDBGrid = class(TDBGrid) private { Private declarations } FonMouseDown:TMouseEvent; protected { Protected declarations } procedure MouseDown(Button:Tmousebutton;Shift:TshiftState;x,y:integer);override; public { Public declarations } published { Published declarations } property row; property OnMouseDown Read FOnMouseDown write FOnMouseDown; end;procedure Register;implementationprocedure Register;begin RegisterComponents('Samples', [TMyDBGrid]);end;{ TMyDBGrid }procedure TMyDBGrid.MouseDown(Button: Tmousebutton; Shift: TshiftState; x, y: integer);begin if assigned(FOnMouseDown) then FOnMouseDown(self,button,Shift,X,Y); inherited MouseDown(button,Shift,X,Y);end;end. DBGridEh难题. windows 2000 的服务程序的定时问题? 多文档图片问题 我的程序在没装过dephi的机器上运行不了,请问该怎么办? 有没有哪位大哥能帮我在广州卖到回湖南的卧铺火车票?急!!!!! 送100,请教可在Delphi6中播放PC喇叭的控件,一定给分! 当在easyGrid或stringGrid中选择一个单元格时,会有一个黑边框,如何去除这个边框呢? 做了个封面,可其他窗体影响封面的加载 关于数据库系统打包的问题?(请进来看看) 请问如何编写OFFICE的助手? 哪位高手有空帮我翻译下面藏文内容 这回还得请大家帮帮我,关于数据更新
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Grids, DBGrids;type
TMyDBGrid = class(TDBGrid)
private
{ Private declarations }
FonMouseDown:TMouseEvent;
protected
{ Protected declarations }
procedure MouseDown(Button:Tmousebutton;Shift:TshiftState;x,y:integer);override;
public
{ Public declarations }
published
{ Published declarations }
property row;
property OnMouseDown Read FOnMouseDown write FOnMouseDown;
end;procedure Register;implementationprocedure Register;
begin
RegisterComponents('Samples', [TMyDBGrid]);
end;{ TMyDBGrid }procedure TMyDBGrid.MouseDown(Button: Tmousebutton; Shift: TshiftState; x,
y: integer);
begin
if assigned(FOnMouseDown) then FOnMouseDown(self,button,Shift,X,Y);
inherited MouseDown(button,Shift,X,Y);
end;end.