OnMouseDown: Reading tshiftstate?

[tappatappa]

I don't know if is a missing feature, but I can't read the tshiftstate in a OnMouseDown event

void __fastcall TFrame1::UniCanvasMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)
{
	if (Shift.Contains(ssShift))
		//do stuff
	else
		//do other stuff
}

the code above always executes the "else" branch. Any ideas / workarounds?

[Ron]

You could create a canvas in javascript, in an htmlframe,

and catch the events directly from the client, sending them

with shiftstate info as an ajaxrequest to that htmlframe.

[tappatappa]

Hi delphidude, thanks for the reply.

 

The thing is: in the actual project I work with the UniCanvas->BitmapCanvas (which is the "actual" TCanvas) a lot. How am I supposed to work with a JS canvas like the one you suggested?