freepascal.compiler/packages/xforms/examples/bm1.xbm

const bm1_width: Longint = 16;
    bm1_height : longint = 16;
    bm1_bits : array [1..32] of byte =  
    (
    $00, $00, $00, $57, $7c, $72, $c4, $52, $c4, $00, $44, $01,
    $44, $1f, $fc, $22, $40, $42, $40, $44, $40, $43, $c0, $40,
    $70, $40, $8c, $20, $00, $1f, $00, $00
    );