Ver Mensaje Individual
  #2  
Antiguo 13-07-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
el menú principal está oculto y aparece al pulsar la tecla Alt y luego se oculta otra vez. ¿Alguien sabe como implementar este comportamiento con Delphi?
Hola.

Podrías hacer:
Código Delphi [-]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Shift = [ssAlt] then
  begin
    if Menu = nil then
      Menu:= MainMenu1
    else
      Menu:= nil;
    Key:= 0;
  end;
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita