Llamar a una funcion almacenandola en una variable

[piccolo2101]

Bueno,
intentando, quizás, acercarme más un poco a la solución que buscas de sSelect+sStatus, voy a explicarte un método que se me ha ocurrido:
Evidentemente un puntero a una función no es más que una dirección de memoria así que sSelect podría ser una dirección de memoria que inicialmente señalase a la función Select_A. Tambíen puedes haces que al iniciar tu aplicación se calculen las diferencias entre Select_A y el resto para saber que desplazamiento debes aplicar respecto a la dirección de memoria de Select_A y esos serán los valores de sStatus. Por ejemplo
Usaré valores enteros para explicarme mejor.
Select_A ----- dirección 100
Select_B ----- dirección 150
Select_C ----- dirección 75

sSelect = 100;
posibles valores de sStatus = 0 (si es Select_A), 50 (si es Select_B), -25 (si es Select_C).

Con esto, es posibles hacer en un momento dado una llamada a la función que quieras con sSelect+sStatus.

Respecto a lo de lenguaje compilado e interpretado discreparé un poquito, siempre desde mi ignorancia, porque lenguajes relativamente interpretados como java o perl requieren de una fase de precompilación para generar el código interpretado y en éste también se han traducido los nombres de funciones y demás por direcciones. Sé que perl tiene una función que permite hacer lo que quieres llamada eval si mal no recuerdo y es posible que realice un cálculo relativo de la posición de memoria de dicha función.

PD: Te recomiendo que calcules los desplazamientos de las funciones respecto a una base (en este caso Select_A) porque una vez los tengas ya puedes cambiar tu código y hacerlo constante ya que la distancia debería ser siempre la misma salvo que modifiques código.

Un saludo y gracias.

[OSKR]

Jonnathan:

Y tambien recuerdo hace mucho vi por ahi una manera de llamar funciones pasandolas como una cadena de texto a una función del compilador que las ejecutaba ¿o tal vez era Visual Basic? .

En mi caso ese fue DBase....Clipper, y se llamaban "Macros", no solo funciones sino q se podían armar sentencias y además era un ejecutable (bueno..el último, DBase era otra vaina!)
piccolo2101:

Evidentemente un puntero a una función no es más que una dirección de memoria así que sSelect podría ser una dirección de memoria que inicialmente señalase a la función Select_A. Tambíen puedes haces que al iniciar tu aplicación se calculen las diferencias entre Select_A y el resto para saber que desplazamiento debes aplicar respecto a la dirección de memoria de Select_A y esos serán los valores de sStatus. Por ejemplo
Usaré valores enteros para explicarme mejor.
Select_A ----- dirección 100
Select_B ----- dirección 150
Select_C ----- dirección 75

Jjjjjjjjjmmmmmmmmm, llevo algunos añitos jugando con punteros en todo cuanto pueda.......pero de ahí a jugar con los desplazamientos y diferencias entre ellos es algo tenebroso, yo particularmente no los emplearía así y menos sin saber si el compilador usa Overlay

[roman]

La verdad creo que se están complicando demasiado. Se tienen tres funciones, Select_A, Select_B y Select_C y se les quiere llamar de manera genérica sabiendo como dato el estado "A", "B" o "C".

Si no se quiere introducir clases entonces basta con esta función:

Código Delphi [-]
function Select(Estado: Char): Integer;
begin
  case Estado of
    'A': Result := Select_A();
    'B': Result := Select_B();
    'C': Result := Select_C();
  end;
end;

simplemente llamándola con

Código Delphi [-]
Select(Estado);

// Saludos

[OSKR]

Eeeeeeehhhhhhhh....puess.........essssteeee....sip, es verdad, pero creo q a veces es necesario ahondar para casos extremos . Por lo menos a mi me ha servido .

[roman]

Empezado por OSKR

a veces es necesario ahondar para casos extremos

Sí, pero a veces es extremo ahondar en casos innecesarios

Creo que termina uno confundiendo a la gente. De hecho me alegra que hayas mencionado el lado tenebroso.

// Saludos

[piccolo2101]

Hola,
estoy totalmente de acuerdo con la sencillez de la solución planteada por roman y, por supuesto, estoy más de acuerdocon las palabras de OSKR pero mi intención sólo era dar una posible solución al problema según se había planteado pero que yo nunca usaría. Básicamente era una respuesta al estilo : "Por poder, se puede..." que una solución viable.

Por cierto, aquí dejo otra más factible:
Se puede crear un array de punteros a funciones que inicialmente guarde las funciones Select_A, Select_B y Select_C en las posiciones 0,1,2 del array.
Sabiendo que sStatus es de tipo enumerado (p.ejemplo) y hacemos que el enumerado coincida con las posiciones dentro del array de las funciones se podría llamar a la función sin hacer distinción con case sólo con sSelect[sStatus].


Un saludo.

[cuburu]

Hola,
Ya metiendome en este tema yo diría lo siguiente:

Utilización de punteros.... mmmmm creo que no debido a que no es muy factible estar jugando con desplazamientos de memoria y direccionamientos esperando que la maquina nunca se atrofie. Java es un claro ejemplo de ello, eliminó el manejo de punteros debido a estos pequeños detalles jejeje.

Sería mejor trabajar con polimorfismo y creo que es más recomendable debido a que es una forma de programar ordenada y que también, o no se que opinen ustedes, ..... Delphi esta creado para trabajar de esa manera aunque a algunos de nosotros se nos olvida eso de vez en cuando jajajaja.

Buen debate chavos, más de estos temas...