[Casimiro Noteví]

Eso es que no has leido bien los libros

Uno cualquiera en La cara oculta de Delphi 4:

Código Delphi [-]
procedure TwndLibretas.DBGrid1DblClick(Sender: TObject);
begin
  bnOk.Click;
end;