Changeset 170 for Include/basic/function.sbp

Timestamp:

Mar 16, 2007, 10:01:14 AM (17 years ago)

Author:

イグトランス (egtra)

Message:

winnt.ab, windef.ab, guiddef.abを導入

File:

• Include/basic/function.sbp (modified) (1 diff)

Include/basic/function.sbp

@@ -330 +330 @@
 End Function
 
-Const HIBYTE(w) = (((w As Word) >> 8) And &HFF) As Byte
-Const LOBYTE(w) = ((w As Word) And &HFF) As Byte
-Const HIWORD(dw) = (((dw As DWord) >> 16) And &HFFFF) As Word
-Const LOWORD(dw) = ((dw As DWord) And &HFFFF) As Word
 Const HIDWORD(qw) = (((qw As QWord) >> 32) And &HFFFFFFFF) As DWord
 Const LODWORD(qw) = ((qw As QWord) And &HFFFFFFFF) As DWord
 
-Const MAKEWORD(l, h) = (((l As Word) And &HFF) Or (((h As Word) And &HFF) << 8)) As Word
 Const MAKEDWORD(l, h) = (((l As DWord) And &HFFFF) Or (((h As DWord) And &HFFFF) << 16)) As DWord
 Const MAKEQWORD(l, h) = (((l As QWord) And &HFFFFFFFF) Or (((h As QWord) And &HFFFFFFFF) << 32)) As QWord
-Const MAKELONG(l, h) = MAKEDWORD(l, h) As Long
 
 '------------