> Problem, I have a TTreeView component and a popup menu attached to it, if
> I right click on an item that isn't selected, the tree selects the item,
> snapps back to the original item, -then- pops up the menu, when I want it
> to popup with the item under the mouse... I've tried manually calling
> the popup menu on the mouse down/up events with no luck, has anyone come
> accross this before?
Mark not sure if this is any help but this is what I have written:
procedure TCamForm.PopMsgS(PSentstate: word; SMsg: string);
var
p: TPoint;
begin
if PSentstate = Pstate then exit;
DynaMenu.caption := SMsg;
GetCursorPos(p);
PopMsg.Popup(p.x, p.y);
Pstate := PSentstate;
end;
Where popmsg is a popup menu of course.
Or an udder one:
procedure TCamForm.RxTrayIcon1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
if button = mbright then PopupMenu1.Popup(X, Y);
end;
Al+
---------------------------------------------------------------------------
New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
Website: http://www.delphi.org.nz
