WORD型整形怎么以2个字节放入内存流中？

Question

SaveToStream(i,sizeof(i));
Word本来就是两个字节的

Answer 1

  报错：[Error] Unit1.pas(38): Incompatible types: 'TStream' and 'Word'

Answer 2

  报错：[Error] Unit1.pas(38): Incompatible types: 'TStream' and 'Word'

   语句是这样的：
procedure TForm1.Button1Click(Sender: TObject);
var
  ms: TMemoryStream;
  i,j:word;
  set1:string;
begin
      set1:='D:\yst\test.txt';      i:=5;
      j:=6;
       ms := TMemoryStream.Create;       ms.SaveToStream(i,sizeof(i));
       ms.SaveToStream(i,sizeof(j));       ms.SaveToFile(set1);
       ms.Free;
end;   哪里不妥呢