Ver Mensaje Individual
  #3  
Antiguo 13-04-2011
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
El código de Caro no afectará a DBGrids en otros formularios pero sí a todos los que haya en ese formulario.

Lo que puedes hacer es usar el método redefinido, no para ejecutar tu código, sino para lanzar el evento:

Código Delphi [-]
procedure TDBGrid.MouseDown(
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if Assigned(OnMouseDown) then
    OnMouseDown(Self, Button, Shift, X, Y);

  inherited;
end;

Así, sólo los DBGrid a los que asignes el evento OnMouseDown ejecutarán el código que desees.

// Saludos
Responder Con Cita