Здравствуйте twask, Вы писали:

T>кстати, возможно ли возвращать результат не только в pVarResult, но и в аргументы?
T>что-то в духе:
T>procedure x(a, b: integer; var y, z: integer);
T>begin
T> y := a + b;
T> z := a — b;
T>end;

Ну, так передавай их VT_BYREF и все.

PS

Вот только непойму... зачем диспач вручную реализовывать?