[NumLock]

Код:

  CreateWindowEx(WS_EX_CLIENTEDGE, 'ListBox', '',
    WS_CHILD or WS_VISIBLE or LBS_EXTENDEDSEL, 120, 40, 121, 97, AWnd, 0,
    HInstance, nil);