Integer in Bits

[braingrenade]

Moin leute !

Wie kann ich einen Integer in seine Bits zerlegen?
also das aus 11 z.b. 1 1 0 1 0 0 0 0 wird (oder so).

die function könnte ungefähr so aussehen :

Delphi-Quellcode:

Type Tboolarray = record 
  bits : array of bool;
end;

function inttobit(int : integer) : Tboolarray;
begin
???
???  //wie's weiter geht weiß ich nicht !
???
end;

Hoffe jemand hat nen Plan wie! (und wie's ander's rum geht)