Zumindest was das Aussehen Deiner Combobox angeht hätte ich was:
Delphi-Quellcode:
H := CreateWindowExW(WS_EX_CLIENTEDGE, 'COMBOBOX', '', WS_VISIBLE or WS_CHILD or CBS_DROPDOWNLIST,
a4.Left, a3.Top + (a3.Top - a2.Top), a4.Right, a2.Bottom+1000, hWnd, 103, 0, nil);
Du brauchst einmal den DROPDOWNLIST-Stil und zum zweiten bezieht sich die Höhenangabe bei so einer ComboBox auf den ausgeklappten Zustand und ist dann quasi eine maximale Höhe. Die genaue Höhe könntest Du noch anhand der Anzahl Deiner Einträge ausrechnen.
Gruß, teebee