Function DetectIsOpen(Cb: TCombobox): Boolean; Begin Result := SendMessage(ComboBox1.Handle,CB_GETDROPPEDSTATE,0,0)=1; End;
Preview:
downloadDownload PNG
downloadDownload JPEG
downloadDownload SVG
Tip: You can change the style, width & colours of the snippet with the inspect tool before clicking Download!
Click to optimize width for Twitter