Скачать: CL | DM;

Как сделать фунцкию LoWord()?   Найти похожие ветки 

← →
Ptr_Suspend   (2013-11-07 18:17) [0]

Есть HiWord() и её тело.
LoWord() - сделано через приведение типа.
Перевожу код на AS3, там этих функций нет.
Не могу найти реализацию LoWord().

---

← →
Rouse_ ©   (2013-11-07 18:25) [1]

Как-то так...
Result := Value and $FFFF; // LoWord
Result := (Value shr 16)  and $FFFF; // HiWord

---

← →
Novice3432   (2013-11-07 18:25) [2]

Может HelloWorld? ;)

---

← →
Ptr_Suspend   (2013-11-07 18:33) [3]

> Rouse_ ©   (07.11.13 18:25) [1]
>
> Как-то так...
> Result := (Value shr 16)  and $FFFF; // HiWord


Из Windows.pas:


function MakeLong(A, B: Word): Longint;
begin
 Result := A or B shl 16;
end;

function HiWord(L: DWORD): Word;
begin
 Result := L shr 16;
end;


---

← →
Rouse_ ©   (2013-11-07 18:36) [4]

> Ptr_Suspend   (07.11.13 18:33) [3]

Это одно и тоже...

---

← →
Ptr_Suspend   (2013-11-07 18:42) [5]

> Rouse_ ©   (07.11.13 18:36) [4]
>
>
> > Ptr_Suspend   (07.11.13 18:33) [3]
>
> Это одно и тоже...


Некрасиво как-то выглядит.

---

← →
Jeer ©   (2013-11-07 21:24) [6]

>Некрасиво как-то выглядит.

За красотой - в Лувр.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.002 c