Ver Mensaje Individual
  #2  
Antiguo 30-03-2008
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 27
Delphius Va camino a la fama
Hola Guillermo80,
¿Deseas traducir de Visual C++ a Delphi?

No se Visual C++ pero un puntero a función o procedimiento en Delphi es así:

Código Delphi [-]
type
  TMiFuncion = function MiFuncion(Algo: TAlgo): TAlgo;

var
  Funcion: TMiFuncion; //nuestra variable que apuntará a funciones del tipo TMiFuncion.

De modo que si tenemos una función cualquiera que cumpla con dicha descripción de tipos y argumentos podemos hacer cosas como esta:

Código Delphi [-]
funcion UnaFuncion(Algo: TAlgo): TAlgo;
begin
  // ... lo que venga aquí
  result := Algo; // es un ejemplo!
end;


begin
  // ....
  Funcion := UnaFunción;
  resultado := Funcion(AlgunaVariableOValor);
end;

No se si se entiende.

Saludos,
__________________
Delphius
[Guia de estilo][Buscar]
Responder Con Cita