Menu dinamico
Buena tarde
Compañeros estoy realizando un menu dinamico pero me falta que cuando se genere y se le de clic abra un formulario
tengo esta funcion pero no se me ocurre como llamar el formulario
|
El real problema es que necesito pasar un valor por la funcion pero no al llarmla me arroja error ya que no se valor darle al sender
|
Ese Documento, ¿qué es? O sea, ¿para qué lo necesitas? ¿De dónde sale? ¿Qué contiene?
|
Siguiendo el ejemplo que has puesto hay varias cosas a comentar...
La cabecera del procedimiento menuDinamicoClick debe coincidir con el evento al que la estás asignando, por lo tanto debe ser como en el primer mensaje, no como en el segundo.
Para obtener el documento hay varias formas, las más sencillas que se me ocurren: a) Usar los parámetros que tienes disponibles. En tu caso tienes un Sender que es de tipo TMenuItem. Si de alguna forma puedes añadir el Documento a ese parámetro ya lo tendrás disponible dentro del procedimiento. En tu caso ya lo has hecho usando el Caption.
Has utilizado esta línea, por lo tanto dentro del evento puedes utilizar lo siguiente:
b) La segunda opción que se me ocurre, es que crees una lista que te relacione los diferentes elementos del menú con el Documento, por ejemplo utilizado una TStringList o un TDictionary. Cuando creas los elementos del menú, los añades a una TStringList, como parejas (Documento, TMenuItem):
Dentro del evento puedes buscar en la lista y encontrar el elemento (TMenuItem) y obtener el Documento asociado.
|
La franja horaria es GMT +2. Ahora son las 14:07:32. |
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