Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Simple simple question.

Posted on 2002-07-28
1
Medium Priority
?
143 Views
Last Modified: 2010-04-04
I want to make ListBox behave as though i just left mouse clicked on it when i press the Right mouse button, i tried
ListBox1.Perform(WM_MBUTTONDOWN,0,0); but it did not work? Anyone know how?

-

  Thanks Craig C.
0
Comment
Question by:craig_capel
1 Comment
 
LVL 22

Accepted Solution

by:
Mohammed Nasman earned 200 total points
ID: 7183256
Hello

 try this, the ItemAtPos method will do the trick

procedure TForm1.ListBox1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  Pon : TPoint;
begin
  Pon.x := X;
  Pon.y := Y;
  if Button = mbRight then
  ListBox1.ItemIndex :=  ListBox1.ItemAtPos(Pon,True);
end;

Best regards
Mohammed Nasman
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
In a question here at Experts Exchange (https://www.experts-exchange.com/questions/29062564/Adobe-acrobat-reader-DC.html), a member asked how to create a signature in Adobe Acrobat Reader DC (the free Reader product, not the paid, full Acrobat produ…
This lesson discusses how to use a Mainform + Subforms in Microsoft Access to find and enter data for payments on orders. The sample data comes from a custom shop that builds and sells movable storage structures that are delivered to your property. …
Suggested Courses
Course of the Month11 days, 14 hours left to enroll

916 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