Lin*_*ife 3 delphi long-integer
我不知道用于搜索的单词.
我有一个四字节的LongInt,我需要将前两个字节的值作为整数,并将最后两个字节的值作为另一个整数.
在这里有一个老屁的记忆时刻.:)
我想这与最不重要和最重要的事情有关,但是一个好的搜索术语暗指我.
uses Winapi.Windows;
var
L : longint; // DWORD
lsw : word;
msw : word;
begin
lsw := LoWord(L);
msw := HiWord(L);
end;
Run Code Online (Sandbox Code Playgroud)
有许多不同的方法可以解决这个问题:
uses
Windows;
var
Value : Longint;
l : Word;
h : Word;
begin
Value := ...;
l := LOWORD(Value);
h := HIWORD(Value);
end;
Run Code Online (Sandbox Code Playgroud)
uses
SysUtils;
var
Value : Longint;
l : Word;
h : Word;
begin
Value := ...;
l := LongRec(Value).Lo;
h := LongRec(Value).Hi;
end;
Run Code Online (Sandbox Code Playgroud)
var
Value : Longint;
l : Word;
h : Word;
begin
Value := ...;
l := Word(Value);
h := Word(Value shr 16);
end;
Run Code Online (Sandbox Code Playgroud)