在CORBA中怎样实现文件传输（数据类型的转换），我的代码老出错？

Question

我在CORBA服务器端实现了这样一个Get函数用于EXE文件的传输，结果怎么老出错，在CORBA中数据类型到底应该怎样转换？请高手指点。function  TIFileTransCorba.Get ( const fileName : WideString): Any;
var
  fs: TFileStream;
  size: Longint;
  strName: String;
  v: Any;
begin
  strName:=ExtractFilePath(Application.ExeName)+fileName;
  fs:=TFileStream.Create(strName, fmOpenRead);
  fs.Read(v, fs.Size);
  Result:=v;
  fs.Free;
end;