Помогите с побитовым сдвигом

[mazila-otzi]

Помогите пожалуйста с побитовым сдвигом в Delphi.
Нужно,чтобы переменная "сдвигалась" влево и вправо.

Нужно это дело для криптографии.
На лабораторных "пишем" на С++,но для меня он дальше,чем Delphi.
И если кто откликнется,то если возможно с комментариями.

Спасибо.

[somewhere]

SHL, SHR (SHift Left, SHift Right) - аналоги одноименных команд ассемблера

A:=B shl 2; Сдвиг значения переменной B на два бита влево, эквивалент умножения на 4. Правые биты заполняются нулями. А, B - целочисленная переменная

[BBB]

Добавлю еще, что указывать, на сколько сдвигать, можно не только константой, но и переменной:

A:=B shr C;

[mazila-otzi]

спасибо!!!