Unwind a Dropdown

[krunch]

Hi

In my memories there is a function to unwind a Dropdown, but I can't find it ..

Is it possible or do I mix with something else ??

[krunch]

Hi

I have made that :

The combobox is extended when clicked, and reduced when it loses focus or modified

So is it possible to unwind (activate) the combobox when I also click on the '<4>' button ??

[owenwengerd]

I don't believe there is any way to open a combo dropdown by lisp code. You can create your own dropdown as a modeless form and display that.

[Fred Tomke]

Hi, maybe a sendkey could solve that. You can open a dropdown by cursor down.
Regards, Fred

[krunch]

Hi, thanks for this suggestion

You meant sendstring ?
I've tried this but it doesn't work .. Arrows keys are not standart characters

1. (dcl_Control_SetFocus ..combobox)
2. (dcl_SendString (chr 175))

[Fred Tomke]

Hi, no, I meant sendkey. Here is a sample I use for ESC:

1. (defun SENDKEY (strKeys / oWScript)
2.   (if (setq oWScript (vlax-create-object "WScript.Shell"))
3.     (progn
4.       (vlax-invoke-method oWScript 'Sendkeys strKeys)
5.       (vlax-release-object oWScript)
6.     ); progn
7.   ); if
8. ); SENDKEY
9.  
10. (SENDKEY "{ESC}")
11.  

Regards, Fred

[krunch]

It works !
I didn't know this "WScript.Shell" method (found a key list here) ..

Thanks a lot for this great idea

[velasquez]

Hi, no, I meant sendkey. Here is a sample I use for ESC:

1. (defun SENDKEY (strKeys / oWScript)
2.   (if (setq oWScript (vlax-create-object "WScript.Shell"))
3.     (progn
4.       (vlax-invoke-method oWScript 'Sendkeys strKeys)
5.       (vlax-release-object oWScript)
6.     ); progn
7.   ); if
8. ); SENDKEY
9.  
10. (SENDKEY "{ESC}")
11.  

Regards, Fred

Hi Fred,
In that situation (Sendkey "{ESC}") would be efficient?

Regards, velasquez

[Fred Tomke]

Hi, vela, this was only a sample thats why krunch looked for the key he needed.
Regards, Fred

[Fred Tomke]

Hi, krunch, thanks for the link!
Great to see that it helps.
Regards, Fred

[krunch]

Thanks to you
---------------

In that situation (Sendkey "{ESC}") would be efficient?

This opens a combobox :

1. (dcl_Control_SetFocus ..combobox)
2. (SENDKEY "{DOWN}")