Question

Delphi中 int 如何转换为word型数据？

Answer 1

var
int: Integer;
wd: Word;
begin
int := 123456;
wd := word(int); // word是2字节，所以int超过2字节的部分会丢弃
ShowMessage(IntToStr(wd));
end;