byte+byte=word -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [216.73.216.5]

ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi · Книги по Delphi

Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как прочитать список файлов, поддиректорий в директории?
5. Как запустить программу/файл?
... (продолжение следует) ...

Вопросы, подробно описанные во встроенной справочной системе Delphi, не несут полезной тематической нагрузки, поэтому будут удаляться.
Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы. Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.

Внимание
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Модераторы: jack128, D[u]fa, Shaggy, Rouse_

Новое голосование

byte+byte=word , преобразование 2-х переменных byte в word

intaari

Сообщ. #1 , 04.04.06, 07:53

Member

Профиль · PM

Рейтинг (т): 0

Добрый день!!!

Столкнулся с проблемой преобразования двух переменных типа byte в одну типа word.
Ведь при переводе нужно указывать какой байт младший, а какой старший.
Посоветуйте пожалуйста как решить эту проблему.

Заранее спасибо.

Булат Шакиров	Сообщ. #2 , 04.04.06, 07:59
Оззя Профиль · PM Поощрения: 2 Dgm Рейтинг (т): 135	Слово := Старший_байт*256+Младший_байт;

Coala	Сообщ. #3 , 04.04.06, 07:59
Unregistered	Ну если у тебя первый ТВОЙ байт должен быть старшим, то можно так W = (B1 * 255) + B2 ЗЫ - спешка нужна при ловле блох, конечно же W = (B1 * 256) + B2 Сообщение отредактировано: Coala - 04.04.06, 08:03

Albinos_X	Сообщ. #4 , 04.04.06, 08:04
Full Member Профиль · PM Рейтинг (т): 16	... W:=(B1 Shl 8) + B2; ... Сообщение отредактировано: Albinos_X - 04.04.06, 08:06

intaari	Сообщ. #5 , 04.04.06, 08:07
Member Профиль · PM Рейтинг (т): 0	Оззя Coala. Спасибо за ответы. Сообщение отредактировано: intaari - 04.04.06, 08:08

Mechanic	Сообщ. #6 , 04.04.06, 13:52
Profi Профиль · PM Рейтинг (т): 88	var Hb,LB: byte; W: word; absolute Hb; begin Hb := $12; Lb := $34; writeln('$'+IntToHex(W,4)); end;

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0349 ] [ 16 queries used ] [ Generated: 13.08.25, 09:32 GMT ]