#pas
function MyFunc(....): string;
var
  Arr: array of Pointer;
  I: integer;
begin
  SetLength(Arr, xxx);
  ....

  asm
    // Вот этот фрагмент мне нужен, условно:
    //for I := High(Arr) downto 0 do
    //begin
    //  push Arr[I]
    //end;
  end;

  ....
end;