双击stringgrid fixedrows 行,发生什么事件

liu9527 2007-05-15 03:57:52
stringgrid
fixedrows:=1
我想在双击第一行时,做指定的事情.
现在发现,当设置了fixedrows=1时,无论,单击或双击第一行,都不会引发click或dbclick事件,该如何做?
...全文
298 6 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
liu9527 2007-05-16
  • 打赏
  • 举报
回复
fiexeddrows对于双击或单击事件都不会击发,我已根据withcsharp 的提示用mouse事件模拟出单击或双击事件.
另一个问题,如何非连续选择多行?
Heyongfeng 2007-05-15
  • 打赏
  • 举报
回复
fixedrows列双击时就是光标所在单元格的双击事件,fixedrows列的双击事件可能比较麻烦
hjh032722 2007-05-15
  • 打赏
  • 举报
回复
我是新手,也许回答你的问题有点太白痴,不过也是学习了,呵呵
procedure TFrmMain.strngrd1DblClick(Sender: TObject);
begin
ShowMessage('双击事件响应');
end;
liu9527 2007-05-15
  • 打赏
  • 举报
回复
mouseup 不能判断是否为双击呀,我希望在双击时做一些事,有没有别的办法
withcsharp 2007-05-15
  • 打赏
  • 举报
回复
procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
acol, arow: integer;
begin
TStringGrid(Sender).MouseToCell(x, y, acol, arow);
ShowMessage(Format('acol:%d,arow:%d', [acol, arow]));

end;
withcsharp 2007-05-15
  • 打赏
  • 举报
回复
mousedown
mouseup

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧