Como conocer que funcion invoco a otra....

[Mick]

Intentar que una funcion/metodo haga algo distinto dependiendo de la funcion desde la que es llamada es una aberracion. Si una funcion debe comportarse de distinta forma precisamente para eso estan los parametros: pasarle informacion a la funcion, que necesita para hacer lo que sea.

Ahora si, seria interesante saber exactamente que se requiere que haga esa funcion, porque puede haber otras soluciones mas logicas ademas de la de pasar un parametro, pero dependeria de cada caso concreto (por ejemplo sobrecargar metodos, usar clases hijas, etc).

Saludos

[oracle]

Gracias Mick por tu respuesta, si lo hubiese sabido que lo que estaba preguntando era una "aberracion" ni lo hubiese mencionado, en fin ya me he tenido que decidir por la via de un parametro adicional asi que gracias otra vez...

//oracle

[Fate]

1) Los metodos en java puedes distinguirlos ya sea por el numero de parametros:

- public void doIt(String x, String y)
- public void doIt(String x, String y, int m)

2) Los metodos en java puedes distinguirlos ya sea por el tipo de parametros:

- public void doIt(String x, String y)
 - public void doIt(String x, Integer y)

Bueno, quizas ya conocias esto(probablemente), lo cual es lo mas cercano que puedo yo brindarte como solucion.

Sin embargo, el hacer lo que has descrito con el método F1() que has dicho me parece que es una mala programación, porque asi estas condicionando a tu método F1() a funcionar en base a F2() y a F3(), pero, pierdes el sentido de lo que es en escencia un objeto y su capacidad de ser rehusado.

Creo que deberias volver a analizar tus métodos, cualquier cosa, aqui sigo...

_______________"Dios esta muerto y su cadaver apesta, su amor por los hombres le ha matado"

[[__hector]]

Podrias quizas tambien utilizar programacion orientada a aspectos (AOP) para esto. Mira a ver si AspectJ te sirve.

[oracle]

Bueno amigos, para que no haya dudas, aqui os dejo lo que termine haciendo, lo de hacer 3 funciones fue solo una idea, ya que lo unico que yo necesitaba que cambiara era solo una linea de codigo en dependencia desde donde fuera llamada la funcione, aqui os la dejo:

public void AddAtomo(Atom A, boolean M){
    
        if(viewer.getMolecula().EsAdyacente(A, this)){

             if(listAtomos.size() == 0){
                listAtomos.add(A);
                matrizAdj = new int[1][1];
                matrizAdj[0][0] = 0;
            ............................
            }
            else
            {
            ...........................
           }
            else if(M){
                viewer.showMessage("Error, seleccione un fragmento correcto", "Accion Invalida", 2);
            }                
            
    };

Lo que sucedia era que en ocasiones yo hacia esta llamada desde un formulario, en este caso necesitaba lanzar un mensaje en algunos casos, y de la otra forma era cuando necesitaba utilizar esta misma funcion de manera interna, para otro proposito pero sin lanzar el mensaje.....Espero hayamos quedado claros todos....

Un saludo


oracle

[oracle]

Bueno amigos, para que no haya dudas, aqui os dejo lo que termine haciendo, lo de hacer 3 funciones fue solo una idea, ya que lo unico que yo necesitaba que cambiara era solo una linea de codigo en dependencia desde donde fuera llamada la funcione, aqui os la dejo:

public void AddAtomo(Atom A, boolean M){
    
        if(viewer.getMolecula().EsAdyacente(A, this)){

             if(listAtomos.size() == 0){
                listAtomos.add(A);
                matrizAdj = new int[1][1];
                matrizAdj[0][0] = 0;
            ............................
            }
            else
            {
            ...........................
           }
            else if(M){
                viewer.showMessage("Error, seleccione un fragmento correcto", "Accion Invalida", 2);
            }                
            
    };

Lo que sucedia era que en ocasiones yo hacia esta llamada desde un formulario, en este caso necesitaba lanzar un mensaje en algunos casos, y de la otra forma era cuando necesitaba utilizar esta misma funcion de manera interna, para otro proposito pero sin lanzar el mensaje.....Espero hayamos quedado claros todos....

En cuanto a la AOP Hector creo que no es conveniente en mi caso mezclarlo, ya que esto desarrollando con POO, aunque siempre seria bueno analizar las alternativas.....

Un saludo


oracle

[Mick]

La solucion propuesta no me parece correcta, se esta mezclando dos cosas diferentes en una misma funcion no se debe mezclar el interface con la implementacion.

Que pasaria si en lugar de mostrar o no mostrar un simple mensaje de error fuese necesario hacer muy diferentes acciones segun desde donde se llame ? , por ejemplo en unos casos podriamos necesitar enviar por correo electronico un aviso, en otros poner un simple mensaje, en otros casos no hacer nada, en otros mostrar el error de otra forma distinta a una simple ventana con un mensaje, etc. tendrias que pasarle a esa funcion un monton de parametros no una simple variable booleana.

Lo logico en ese caso es que la funcion devuelva un valor verdadero o falso que indique si ha hecho lo que tenga que hacer, y el mensaje se muestre desde el formulario que hace la llamada a esa funcion en funcion del resultado devuelto por la funcion.

Incluso podria paracer mas logico que el siguiente codigo tambien estuviese fuera de la funcion:

 if(!viewer.getMolecula().EsAdyacente(A, this)){
                viewer.showMessage("Error, seleccione un fragmento correcto", "Accion Invalida", 2);
            }

Saludos

[Ñuño Martínez]

Supongo que la máquina virtual de Java tiene pila y que también es posible obtener la "dirección" de una función. Si es así, entonces podría hacerse obteniendo la dirección de las funciones F2() y F3(). Luego, en F1(), se extrae la dirección del llamante de la pila y se vuelve a apilar para evitar problemas. Al menos en las máquinas "reales" puede hacerse.

[edit]En Pascal sería algo así:

Código Delphi [-]
PROCEDURE F1;
VAR
  DireccionFuncion: POINTER;
BEGIN
  ASM
    POP AX;
    PUSH AX;
    MOVE @DireccionFuncion, AX;
  END;
  IF (DireccionFuncion = POINTER (@F2)) THEN
  BEGIN
  ...
  END
  ELSE IF (DireccionFuncion = POINTER (@F3)) THEN
  BEGIN
  ...
  END;
  ...
END;