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

Вниз

shl / shr   Найти похожие ветки 

 
p1115   (2007-03-21 19:45) [0]

Уже долго мучаюсь, не могу всё никак сделать:

Есть одно число LongWord = $12340060; и второе Byte = $00.
Каким образом получить такое число: $1234006000. понимаю, что нужно сипользовать shl / shr, но каким образом - не дошло.

Ещё например:
LongWord = $12345678; Byte = $ff. Result := $12345678ff.

?


 
Leonid Troyanovsky ©   (2007-03-21 19:57) [1]


> p1115   (21.03.07 19:45)  

> Каким образом получить такое число: $1234006000. понимаю,
>  что нужно сипользовать shl / shr, но каким образом - не

Это число за пределами понимания shl / shr.

--
Regards, LVT.


 
palva ©   (2007-03-21 20:24) [2]

Придется использовать восьмибайтный тип Int64

procedure TForm1.FormCreate(Sender: TObject);
var
 Res: Int64;
 LW: LongWord;
 B: Byte;
begin
 LW := $12340060;
 B := $00;
 Res := Int64(LW) Shl 8 Or b;
 Label1.Caption := (IntToHex(Res, 16));
end;



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

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

Наверх





Память: 0.44 MB
Время: 0.041 c
3-1169531185
валет
2007-01-23 08:46
2007.04.15
вопрос по MS SQL Server 2000


2-1174148737
MIV
2007-03-17 19:25
2007.04.15
Заполнение базы данных из приложения


5-1151065835
Артёмич
2006-06-23 16:30
2007.04.15
TreeView передвежение главных item ов вверх, вниз


2-1174747778
Malik
2007-03-24 17:49
2007.04.15
Вот про TStrings


1-1171963386
RJ
2007-02-20 12:23
2007.04.15
указатель на форму





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский