List Box in Lazarus: Keyboard shortcut for double-click?

[AMJF]

I'm using Windows 10, but different apps require different keyboard shortcuts for double-clicking (like a mouse does), so I'm wondering what Lazarus/FPC apps use?

[AMJF]

To elaborate, in my program with a TListBox, I find that using the up/down arrow keys is apparently the same as clicking on each item in the list box with the mouse, but sequentially. So I'm wondering if I can program in an option to double-click with the keyboard in the list box with, say, the Enter key?

[jamie]

Code: Pascal  [Select][+][-]

1.  
2. procedure TForm1.ListBox1DblClick(Sender: TObject);
3. begin
4.   beep;
5. end;
6.  
7. procedure TForm1.ListBox1KeyPress(Sender: TObject; var Key: char);
8. begin
9.   if Key = #13 then ListBox1DblClick(Sender);
10. end;                                      
11.  
12.  

[AMJF]

The second procedure works fine, but do I need the "beep"? Seems to work without it.

[jamie]

That's my brand!

Do as you please with the beep!, its just there as a test!

[AMJF]

Don't be offended, the tip is much appreciated.

If the beep is for feedback, then in my case, I will know if it works, and it does.

Thanks!