Hola
No me sale, algo he hecho mal, pongo el código que tengo resumido
Código Delphi
[-]
private
funciones : array of procedure(A,B,C:Variant) of Object;
procedure LoqueSea(A,B,C:Variant);
implementation
{$R *.dfm}
procedure TForm1.button1(Sender: TObject);
var
aux1,aux2,aux3 : Variant;
begin
aux1 := 'primer';
aux2 := 'segundo';
aux3 := 'tercero';
SetLength(funciones,1);
funciones[0](aux1,aux2,aux3) := LoqueSea(aux1,aux2,aux3); end;
el error que me da es:
Left side cannot assigned to, que la asignación no es correcta, pero como se asigna entonces.
A ver si alguien me ayuda, porque ahora si estoy perdido.
Saludos