DoubleClick on DBAdvGrid

VCL TMS VCL UI Pack
1

Hello:


Can you help me to limit the doubleClick on DBAdvGrid to any cells of only one specific column, and not to the cells of  the others columns of the grid. 
Thanks for your help

Soledad
2

Nobody can help me?

Thanks
3

I do not understand your question. How exactly do you want to limit this? A user can always perform a double click on any area where he can move the mouse on the screen. If you do not want to handle the double click event, you can always ignore it.

4

Thanks Bruno.

I have a DBAdvGrid with 15 columns.
I want to limit the doubleclick only to the cells of any rows of the third column.
Is that possible?
5

And how exactly do you want to limit this? What exact behavior do you want?

6

Doubleclick on any cells of the third column execute an action (Open a file) with this code:


procedure TVisor.DBAdvGrid1DblClick(Sender: TObject);
begin
ADOQuery4.Close;
ADOQuery4.SQL.Clear;
ADOQuery4.Sql.text:='select ARCHIVODICOM from ESTUDIOS where P_PID like '+QuotedStr(DBEditID.Text+'%') ;
ADOQuery4.Open;
with ADOQuery4 do
ButtonCargar.ButtonClick;
Data1.TablaPacientes.Edit;
Data1.TablaPacientes.FieldByName('FECHAAPERTURA').AsDateTime := DateEdit2.Date;
Data1.TablaPacientes.Post;
PanelVisor2D.BringToFront;
PanelDual.SendToBack;
PanelMultiImagen.SendToBack;
Panel8.BringToFront;
Panel15.BringToFront;
DicomMultiViewer1.BringToFront;
DicomMultiViewer1.DisplayWLLabel:= True;
DicomMultiViewer1.DisplayLabel:= False;
PanelTools.Visible:= True;
Slider1.BringToFront;
BuscarImg.Visible:= False;
Edit1.Visible:= False;
Mouse_Event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
DicomMultiViewer1.LeftMouseInteract:= miZoom;
DicomMultiViewer1.SetFocus;
end;

and doubleclick on any other cell of the remainder columns do nothing.
Thanks 
7

Please use the event OnDblClickCell instead and write something like:


procedure TForm1.DBAdvGrid1DblClickCell(Sender: TObject; ARow, ACol: Integer);
begin
  if (ACol <> 3) then
  begin
    // handle dbl click here
  end;
end;

8

Thanks Bruno

Works fine.