Solved

In Delphi VCL, TDatePicker, how do you force the combobox to open?

Posted on 2014-09-04
2
347 Views
Last Modified: 2014-09-05
With a normal combox you can force the box to open when you enter the field. How do you make this happen with TDatePicker in combox mode?

I have tried the code shown below, but this doesn't activate.
SendMessage(cbContact.Handle, CB_SHOWDROPDOWN, 1, 0);

Open in new window

0
Comment
Question by:GrahamDLovell
2 Comments
 
LVL 19

Accepted Solution

by:
MerijnB earned 500 total points
ID: 40305352
You can use

 SendMessage(cbContact.Handle,WM_SYSKEYDOWN, VK_DOWN, 0);

Open in new window

0
 

Author Closing Comment

by:GrahamDLovell
ID: 40305369
Brilliant! Thanks
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
EvenOdd challenge 10 88
maxMirror challenge 10 114
scoreUp challenge 14 56
sumHeights  challenge 17 65
Having just graduated from college and entered the workforce, I don’t find myself always using the tools and programs I grew accustomed to over the past four years. However, there is one program I continually find myself reverting back to…R.   So …
Go is an acronym of golang, is a programming language developed Google in 2007. Go is a new language that is mostly in the C family, with significant input from Pascal/Modula/Oberon family. Hence Go arisen as low-level language with fast compilation…
The viewer will learn how to implement Singleton Design Pattern in Java.
This theoretical tutorial explains exceptions, reasons for exceptions, different categories of exception and exception hierarchy.

914 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now