Hola...
Cita:
Empezado por robacio_ivan
Lo que yo quiero hacer es algo mas o menos parecido pero no es del todo eso, adjunto el código de lo que hago que no me funciona. El procedimiento en si hace varias cosas más yo deje solamente la parte que no me funciona y me interesaria que me ayuden. Espero ser mas claro
Código Delphi [-]
procedure EjecutarForm(var pForm: TfrmForm);
begin
inherited;
pForm.ExecuteModal(self)
end;
Para despues llamar a la ejecución de un form de la siguiente manera
EjecutarForm(TfrmVenta); |
¿Y por qué no te funciona? ¿Algún error? ¿Cuál es el mensaje del error?
Por que así como lo pones, para empezar, la palabra reservada
inherited solo tiene uso en métodos de la clase que son
override, no en simples procedimientos.
Otro error que veo es el uso de la variable
Self, que también solo tiene uso dentro de algún método de una instancia de una clase (o como referencia a un tipo de clase dentro de un método de clase).
Saludos...