MouseDown en DbGrid no funciona como espero

[roman]

Vaya, nunca había notado esto, sí que es raro. Responde al MouseUp pero no al MouseDown.

// Saludos

[[oscarac]]

Ghost in the Machine

[roman]

Revisando el código de la VCL veo que es el comportamiento por diseño. El método MouseDown de TCustomDBGrid sólo llama al método heredado de TCustomGrid en los casos señalados.

Tendrías que redefiir el método MouseDown para poder acceder al evento.

// Saludos

[[ElDioni]]

Gracias a todos por sus respuestas,
de momento voy a probar con la solución que propone Casimiro y a ver que pasa.
Les mantengo informados, Gracias de nuevo.

Saludos

[roman]

Eso no va a servir, porque quien recibe el evento no es el formulario. No es una cuestión de foco, un MouseDown debe, por si sólo, poner el foco en el control. El punto, como dije, es que, el evento MouseDown del TCustomDBGrid nunca llama al método heredado y, por ende, nunca se llama al evento del usuario.

// Saludos

[[ElDioni]]

Hola otra vez,

efectivamente roman tiene razón, esa solución que proponía Casimiro me ha dejado igual que estaba, no me lanza el código que quería, me gustaría probar con tu solución roman pero en cuanto a redifinir metodos me temo que estoy más verde que la almendra en Junio.
Si te encuentras con animo de echarme una mano te lo agradecería.

Saludos.

[Casimiro Noteví]

Empezado por ElDioni

Hola otra vez, efectivamente roman tiene razón, esa solución que proponía Casimiro me ha dejado igual que estaba, no me lanza el código que quería,[..]

quien tiene boca, se equivoca

[[ElDioni]]

No pasa nada, más que me equivoco yo seguro que no te equivocas tú, por lo menos veo que el DBGrid viene así de serie, quería comentarles que yo tenía un Grid de terceros que se llama SMDBGrid que si que actua bien en el evento MouseDown pero que lo descarté porque, a diferencia del DBGrid normal, no me dejaba seleccionar una parte de un campo de la línea de un registro, por ejemplo, el cliente se llama "pepito el de los palotes" y el dbgrid me deja seleccinar solo "palote" y luego podía hacer un filtro y que me pusiera todos los clientes "Palote" , por lo que volví al DBGrid.

Saludos.

[*Caro*]

Empezado por ElDioni

................me gustaría probar con tu solución roman pero en cuanto a redifinir metodos me temo que estoy más verde que la almendra en Junio.

Hola ElDioni, yo tampoco se mucho de eso, pero creo que tendrías que desprotejer tu dbgrid y hacer esto:

Código Delphi [-]
type
  TDBGrid =  class(DBGrids.TDBGrid)
      procedure MouseDown(Button: TMouseButton; Shift: TShiftState;
      X, Y: Integer); override;
  end;

  TForm1 = class(TForm)
  ..................................
  ..................................

procedure TDBGrid.MouseDown(Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  Form1.Label1.Caption := 'algo'; //digamos que queremos mostrar algo en un label
  inherited MouseDown(Button, Shift, X, Y);
end;

Si me he equivocado, roman nos va a corregir .

Saluditos

[roman]

Empezado por Caro

Si me he equivocado, roman nos va a corregir .

¡Ah! Pero ¿qué fama me hacen!

Claro que no te voy a corregir, lo que has puesto es perfecto

// Saludos

[[ElDioni]]

Hola, a alguno le suena este mensaje "Failed to load resources from resources file please check your setup" y que luego se te cierre el delphi sin despedirse ni nada.

Saludos.

[[Chris]]

Lo raro que me suena es que el evento dispare tu código solo cuando no está sobre la rejilla de datos. La rejilla de datos no es un control, de hecho no es nada más que un lienzo donde se dibujan los datos. Las cabeceras de columnas y las partes en blanco también son parte del mismo lienzo.