Popup en el botón izquierdo del ratón

[Peri]

¿Hay alguna forma que cuando se pulse el botón izquierdo del ratón en cualquier control, por ejemplo un botón, aparezca un popup ya establecido?

Lo consigo hacer pero siempre con el botón derecho del ratón.

Gracias

[dec]

Hola,

Asigna el "PopUp" al control que necesites, y, a la propiedad "Trackbutton" del "PopUp" dale el valor "tbLeftButton".

[Peri]

Hola dec, precisamente eso ya lo he hice pero sin ningún resultado. Creía que ahí estaba la solución, y como no me salía decidí buscar en el foro, y luego escribir.

Pero nada, haciendo eso no da ningún resultado con el botón izquierdo.

¿Estás seguro que es así?

[Khronos]

Yo siempre utilicé este método:

Código Delphi [-]
var
  Pos: TPoint;
begin
  GetCursorPos(Pos);
  PopupMenu1.Popup(Pos.X, Pos.Y);

Colocas el código en el evento onClick de tu componente y no le asignas nada a la propiedad popupmenu.

Salu2

[Peri]

Gracias Khronos.

Se me ocurrió que tenía que utilizar algo en el evento Onclic, pero no sabía qué, y también estuve probando con el método Popup() pero sin resultado.

Ahora sí funciona perfectamente.