CreateWindow ('COMBOBOX', 'combobox', WS_CHILD or WS_VISIBLE or WS_VSCROLL or CBS_DROPDOWNLIST, 10, 10, 145, 500, Form1.Handle, 0, hInstance, nil);