>>607
64個までならInt64型があるよ

type
 TNum = 0..63;
 TNums = set of TNum;

procedure TForm1.Button1Click(Sender: TObject);
var
 num: Tnums;
 i: Int64;
begin
 i := Int64(num);
end;

これでコンパイル通ったよ