Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   ToolButon con PopUp asociado como desplegar automaticamente (https://www.clubdelphi.com/foros/showthread.php?t=13121)

FNADALO 06-08-2004 13:22:45

ToolButon con PopUp asociado como desplegar automaticamente
 
Hola Compañeros he asociado un ToolButton a un PopUpMenu
como hago para que se depligue automaticamente el PopUpMenu
asociado sin hacer el click sobre el desplegable. (este úlimo funciona)

Gracias.

ruina 06-08-2004 13:50:54

mira a ver que tal asi:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var p:tpoint;
begin
    p:=ToolButton1.ClientToScreen(point(0,ToolButton1.Height));
    ToolButton1.DropdownMenu.Popup(p.X,p.Y);
end;

FNADALO 06-08-2004 14:01:29

Posicionarme en un Item del PopUp y ejecutar
 
Gracias Ruina

Lo Probe y funciona ahora como puedo posicionarme sobre
un item y ejecutar su acción.

Nuria 06-08-2004 14:06:22

Hola FNadalo!

Si tienes el ToolButton o el Item asociado a una Action. Ejecuta el Action directamente:

Código Delphi [-]
  NomAction.Execute(Sender);

Saludos :).

Delphius 08-08-2004 09:24:22

Solucion sin código
 
Disculpa... ¿a que te refieres con: "sin hacer clic en desplegable"?

Si a lo que te refieres es a mostrar si tener que hacer click con el bo´ton secundario puedes solucionar esto si colocas a la propiedad DropdownMenu dicho Popup
Esto... es por lo menos en delhpi 6... la verdad es que no me acuerdo si es igual en otras versiones..


La franja horaria es GMT +2. Ahora son las 12:36:23.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi