Delphi, чтения битов из бинарного файла

есть процедура, которая может скачать опредиленное количество байт в масив

procedure TForm1.Button2Click(Sender: TObject);
const
n=4; //количество байтов которые будут считаны
var
f:file;
title:array of byte;
begin
SetLength(title,n);
AssignFile(f,Edit1.Text);
Reset(f,1);
BlockRead(f,Pointer(title)^,n);
CloseFile(f);
end;

вопрос:
как потом дальше перевисти ети байты в биты, чтобы с ними можно было дальше работать как с переменными (сравнивать....)??? ?

подробный гайд приветствуетса...