活动表格1:
procedure TForm1.Panel1DblClick(Sender: TObject);
begin
TForm2.Create(Self).ShowModal;
end;
Run Code Online (Sandbox Code Playgroud)
活动表格2:
procedure TForm2.DBGrid1CellClick(Column: TColumn);
begin
ShowMessage('Test');
end;
Run Code Online (Sandbox Code Playgroud)
我该怎么做才能避免fom2的onCellClick事件?