求救各路高手,二进制问题!

Question

{ 写DWord类型的值到文件 }
procedure TForm1.btnWriteClick(Sender: TObject);
var
  MS:TMemoryStream;
  dV:DWORD;
begin
  MS:=TMemoryStream.Create();
  dV := 32778;
  MS.SetSize(Sizeof(DWORD));
  Move(DV,MS.Memory^,Sizeof(DWord));
  MS.SaveToFile('kk.dat');
  MS.Free();
end;{从文件中读DWORD的值}
procedure TForm1.btnReadClick(Sender: TObject);
var
  MS:TMemoryStream;
  dV:DWORD;
begin
  MS := TMemoryStream.Create();
  MS.LoadFromFile('kk.Dat');
  Move(MS.Memory^,dV,Sizeof(DWORD));
  MS.Free();
  ShowMessage(intToStr(dV));
end;