Форум: "Начинающим";
Текущий архив: 2007.02.18;
Скачать: [xml.tar.bz2];

Вниз

LoWord и hiWord   Найти похожие ветки 

← →
Stanislav ©   (2007-01-29 11:42) [0]

Подскажите как в переменную типа Integer записать эти значения?

---

← →
Сергей М. ©   (2007-01-29 11:43) [1]

LoWord(MyIntVariable) := ...
HiWord(MyIntVariable) := ...

---

← →
Stanislav ©   (2007-01-29 11:45) [2]

Так не работает.

---

← →
evvcom ©   (2007-01-29 11:49) [3]

Или
LongRec(MyIntVariable).Lo := ...
LongRec(MyIntVariable).Hi := ...

---

← →
evvcom ©   (2007-01-29 11:50) [4]

> [1] Сергей М. ©   (29.01.07 11:43)

Кстати, HiWord не прокатит, это функция.

---

← →
easy ©   (2007-01-29 11:50) [5]

procedure TForm1.Button1Click(Sender: TObject);
var
 hi,lo:word;
 wparam:integer;
begin
 hi:=$1B45;
 lo:=$FF;
 wparam:=makewparam(lo,hi);
 showmessage("$"+inttohex(wparam,8));
end;

---

← →
evvcom ©   (2007-01-29 11:51) [6]

Или
MyIntVariable := MakeLong(A, B);

---

← →
Stanislav ©   (2007-01-29 11:52) [7]

Спасибо!

---

← →
Сергей М. ©   (2007-01-29 11:53) [8]

MyIntegerVariable := MAKELONG(MyLoWordValue, MyHiWordValue)

---

← →
GrayFace ©   (2007-01-29 13:15) [9]

Для коллекции:
MyIntVariable:= Lo + Hi shl 16;

---

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

Форум: "Начинающим";
Текущий архив: 2007.02.18;
Скачать: [xml.tar.bz2];

Наверх

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