Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.09.25;
Скачать: [xml.tar.bz2];

Вниз

Сложение двух байтов   Найти похожие ветки 

 
nikkkkk   (2003-09-12 17:02) [0]

Народ, кто знает как сложить две переменные типа BYTE , чтобы получиллась одна переменная типа Word или SmallInt.
Заранее спасибо...


 
nikkkkk   (2003-09-12 17:04) [1]

???


 
ZEE   (2003-09-12 17:05) [2]

var
b1,b2:byte;
w1:word;// или smallint
...
w1:=b1+b2;

или я что-то не понял...


 
zaporshivets   (2003-09-12 17:06) [3]

var
b1, b2 : byte;
wrd : Word;
asm
mov al, b1
mov ah, b2
mov wrd, ax
end;


 
Anatoly Podgoretsky   (2003-09-12 17:10) [4]

WordRec.Hi/WordRec.Lo


 
Nikolay M.   (2003-09-12 17:10) [5]

Имхо, юмор в том, чтобы потом из Word получить два числа по Byte :)
Если так оно и есть, тогда
word_var := byte1 shl 8 + byte2;


 
nikkkkk   (2003-09-12 17:11) [6]


> ZEE © (12.09.03 17:05) [2]
> var
> b1,b2:byte;
> w1:word;// или smallint
> ...
> w1:=b1+b2;
> или я что-то не понял...

в этом случае если b1=255 а b2=200, w1 получится 455. А мне бы желательно узнать можна ли сложить логически: 11111111дв+11111111дв=1111111111111111дв(65536дес)???


 
clickmaker   (2003-09-12 17:11) [7]

w := b1 or b2 shl 8;


 
zaporshivets   (2003-09-12 17:19) [8]

Ты ,по-моему вообще не понимаешь, что такое вообще сложить логически. Если ты берешь два байта и складываешь их логически ты получаешь БАЙТ, а не ворд, а если тебе надо сцепить два байта в слово, так смотри выше тебе уже вон сколько постов написали!!!


 
nikkkkk   (2003-09-12 17:20) [9]

всем агромнейшее спасибо...
вопрос закрыт.


 
Anatoly Podgoretsky   (2003-09-12 17:20) [10]

nikkkkk (12.09.03 17:11) [6]
Ты ответы то читаешь или как?


 
Nikolay M.   (2003-09-12 17:21) [11]

А объясни, плз, народу, что такое, по-твоему, "сложить логически"?


 
sniknik   (2003-09-13 00:31) [12]

рано закрыл
еще вариант до кучи, вариаций валом как видиш.
var
wrd: Word;
b : array[0..1] of byte absolute wrd;
begin
b[0]:= 1;
b[1]:= 2;



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

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

Наверх





Память: 0.46 MB
Время: 0.009 c
6-82374
test
2003-07-24 15:53
2003.09.25
Как переслать по TCP TStringList (пример пожалуйста)


8-82340
avk
2003-06-01 00:12
2003.09.25
методо canvas


1-82220
Masterok
2003-09-12 11:45
2003.09.25
ЕЩЁ 1 ВОПРОС ПРО ЗВУК (громкость)


14-82451
Владимир Мунякин
2003-09-08 04:39
2003.09.25
О скоростном модеме разработанными Белорусами


6-82365
rrew
2003-07-25 16:37
2003.09.25
Чат на Dephi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский