Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   PopUpMenu y Menus Emergentes (https://www.clubdelphi.com/foros/showthread.php?t=32674)

Ana Tudela 13-06-2006 11:22:47

PopUpMenu y Menus Emergentes
 
Hola,

me gustaría saber como puedo anular los popupmenus de windows de algunos controles de Delphi. (por ejemplo: TEdit).
El botón derecho no lo puedo anular porque lo tengo como evento activo en ciertas circunstancias.

Muchas gracias.

Bicho 13-06-2006 11:45:48

Pues por ejemplo para un tedit prueba a lo siguiente:

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
var noPopup: TPopupMenu;
begin
   noPopup:=TPopupMenu.Create(Nil);
   Edit1.PopupMenu := noPopup;
end;

Espero te sirva.

Saludos


La franja horaria es GMT +2. Ahora son las 10:58:24.

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