Declarar evento OnExit en StringGrid

[Casimiro Noteví]

Y pregunto, si ese componente está heredado de un TStringGrid, según he entendido, entonces tendrá su evento OnExit, ¿no es así?

[[newtron]]

Empezado por Casimiro Notevi

Y pregunto, si ese componente está heredado de un TStringGrid, según he entendido, entonces tendrá su evento OnExit, ¿no es así?

Pues imagino pero yo no lo veo por ningún sitio. Yo lo pondría aquí pero no sé si es adecuado, tiene casi 5000 lineas.

[Casimiro Noteví]

Empezado por newtron

Pues imagino pero yo no lo veo por ningún sitio. Yo lo pondría aquí pero no sé si es adecuado, tiene casi 5000 lineas.

Hombre, en todo caso subes el ficherito comprimido
¿5000 líneas el stringgrid heredado?, pues sí que está modificado
Si haces una búsqueda por "onexit" en el código del componente, ¿no está?. Y si está, ¿en qué sección?, private, public, etc.



Tengo que salir, vuelvo en un rato

[[newtron]]

Pos bueno, aquí lo llevas. Quiero recordar que te lo envié en alguna ocasión para algo que preguntaste sobre un evento.

Si eres tan amable le echas un vistazo y me dices algo.

Gracias y un saludo

[Casimiro Noteví]

Ya recuerdo al 'pequeñito', sí, bueno, me parece que tiene un evento exit, se llama CMExit

Código Delphi [-]
procedure TNTStringGrid.CMExit(var Message: TCMExit);
begin
  Boton.Visible := False;
  if Assigned(InplaceEditor) then begin
    if InplaceEditor.Visible then begin
      InplaceEditor.Perform(WM_KEYDOWN, VK_ESCAPE, 0);
    end;
  end;

  SendMessage(Handle, SG_SALGOFILA, Row, 0);
  inherited;
end;

¿Puede ser?, ¿o sirve para salir de alguna celda?

[[newtron]]

Pues llevas más razón que un santo, lo que me ha despistado es que el puñetero botón que precisamente pongo invisible en ese evento me lo encuentro posteriormente visible y es porque pasa por una de las funciones que lo vuelve a poner visible.

Seguiré mirando a ver cómo lo hago.

Gracias amigo, y un saludo.