BorlandTalk.com

johnp · Guest

I want to detect left and right double mouse clicks.
No method exists in BCB6 Standard Ed. for right
dbl clicks so I have these handlers.
However they aren't called. Why ?

//1st Header unit *.h
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <ComCtrls.hpp>
#include <new>
#include <winuser>
using namespace std ;
//--------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TMainMenu *MainMenu1;
void __fastcall FormMouseUp(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y);
void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y);
private: // None yet . . .
protected: // Windows message handlers follow
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_LBUTTONDBLCLK, TMessage, LeftMsBtnDblClck) ;
MESSAGE_HANDLER(WM_RBUTTONDBLCLK, TMessage, RghtMsBtnDblClck) ;
END_MESSAGE_MAP(TForm);
public: // User stuff
__fastcall TForm1(TComponent* Owner);
void __fastcall LeftMsBtnDblClck(TMessage Message) ;
void __fastcall RghtMsBtnDblClck(TMessage Message) ;
} ;
extern PACKAGE TForm1 *Form1;
#endif
//============================================
//1st .cpp unit *.cpp
#include <vcl.h>
#pragma resource "*.dfm"
#include "graph1.h"
using namespace std ;
TForm1 *Form1 ; //= new TForm1(NULL) ;
//----------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner){}
//-----------------------------------------------
//Handler is not called Why ?
void __fastcall TForm1::LeftMsBtnDblClck(TMessage Message)
{
//. . .do something
;}
//------------------------------------------------
void __fastcall TForm1::RghtMsBtnDblClck(TMessage Message)
{
/. . /do something
;}

Hans Galema · Guest

johnp wrote:

johnp · Guest

Hans

Thanks for that !

"Hans Galema" <notused (AT) notused (DOT) nl> wrote in message
news:445b42e4$1 (AT) newsgroups (DOT) borland.com...