Algun motivo por el cual no se ejecute GetEditText, en un grid
Hola de nuevo
Estoy trabajando con Delphi 7, con un grid cuyas columnas son check, el cual se encuentra en un tabsheet, pero se me esta presentando el problema de que no ejecuta el evento GetEditText. Me prodrian orientar a saber que puede afectar para que no se ejecute el evento, en el la forma como tal tengo keypreview en true, no se si eso puede ayudar en algo. |
Cita:
Acaso el evento no se ejecuta si las columnas son check? Por que si la columna es para editar texto si se ejecuta. |
Hola Livey.
¿ Redefiniste el método en la clase TStringGrid para hacer pública la función ?
Saludos. |
Recuerda que utilizo Delphi 7
gracias.;) |
Cita:
Dame un minuto y te pongo el ejemplo completo. |
Aca está.
Funciona perfecto (Delphi 7). Saludos. :) |
Es más Livey, al ser GetEditText un método de la clase TCustomGrid, podés redefinir el método para cualquiera de sus descendientes...
Así podés hacer: con el mismo resultado. Saludos. :) |
Ok,
lo que no entiendo es porque no pasa por el evento GetEditText, cuando hago click en la columna. Ahora esas columnas tienen la propiedad de que son check, por lo que no se ejecuta el GetTexEdit, pero si la columna es para editar texto si se ejecuta. Quisiera me aclaran si al ser la columna tipo check, no ejecuta dicho evento. Te explico lo que necesito es capturar lo que tiene la columna antes de que aplique el check, debido a que realizo algunas validaciones y dependiendo de eso aplica o no el check en la columna, entonces si la validación no permite aplicar el check, necesito que la columna regrese a su estado anterior para lo cual realizo lo siguente(o al menos asi lo solucioné):
donde ValorAntes es el valor que toma la columna cuando la validación me retorna false, de manera que regresa al estado anterior. En el Grid.OnvalidDato
|
Hola Livey.
Ahora si !! GetEditText no es un evento... es una función.:) El evento a que te referís es OnGetEditText... en ese caso la respuesta la dá la ayuda de Delphi: "OnGetEditText does not occur unless the Options property includes goEditing" Para tu propósito... ¿ No te sirve el evento OnSelectCell ? Primero tiene que posicionarse, para despues aplicar el check... Saludos. |
Tienes razon omiti el "On", disculpa.
Bueno yo lo solucione con OnBeforeSelect, y me funciona correctamente, para mi propósito. Y muuuchas gracias por la ayuda. |
De nada Livey, me alegro que lo solucionaras :)
Saludos. |
La franja horaria es GMT +2. Ahora son las 01:32:38. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi