New Tip - ...disable a MenuItem without greying it ?

  • From: "SwissDelphiCenter.ch" <newsletter@xxxxxxxxxxxxxxxxxxxx>
  • To: sdcnewtip@xxxxxxxxxxxxx
  • Date: Thu, 28 Feb 2002 12:41:03 +0100

* SwissDelphiCenter new Tip newsletter
* www.swissdelphicenter.ch
*
* To unsubscribe send a mail to sdcnewtip-request@xxxxxxxxxxxxx with the
* subject unsubscribe


Hallo,

Folgender neuer Tip ist neu auf SwissDelphiCenter verfügbar:

Besuchen Sie die Programmier Tips unter 
http://www.swissdelphicenter.ch/de/tipsindex.php


Bewerten Sie diesen Tip nach Schwierigkeitsgrad, Nützlichkeit und Gesamthaft auf
http://www.swissdelphicenter.ch/de/showcode.php?id=1033



Autor:
Loïs Bégué <delphi@xxxxxxxx>
http://www.begue.de


-------------
...ein MenuItem deaktivieren, ohne dass es grau dargestellt wird ?
-------------
Kategorie: Oberfläche



procedure TForm1.Button1Click(Sender: TObject);
var
  M: TMenu;
begin
  M := Application.MainForm.Menu;
  // Den ersten Menueintrag deaktivieren
  // The first Item will be disabled
  EnableMenuItem(M.Handle, M.Items[0].Command, MF_BYCOMMAND or MF_DISABLED);
end;




Best Regards
SwissDelphiCenter Team
www.swissdelphicenter.ch
[automatisch generierte EMail]


----------------------------------------------------
ENGLISH NEWSLETTER
----------------------------------------------------

Hi,

This new tip is new available on SwissDelphiCenter.ch:

Visit the programming tips at http://www.swissdelphicenter.ch/en/tipsindex.php


Rate this tip after skill, useful and overall at
http://www.swissdelphicenter.ch/en/showcode.php?id=1033



Author:
Loïs Bégué <delphi@xxxxxxxx>
http://www.begue.de


-------------
...disable a MenuItem without greying it ?
-------------
Category: Forms



procedure TForm1.Button1Click(Sender: TObject);
var
  M: TMenu;
begin
  M := Application.MainForm.Menu;
  // Den ersten Menueintrag deaktivieren
  // The first Item will be disabled
  EnableMenuItem(M.Handle, M.Items[0].Command, MF_BYCOMMAND or MF_DISABLED);
end;



Best Regards
SwissDelphiCenter Team
www.swissdelphicenter.ch
[automatic generated EMail]

Other related posts:

  • » New Tip - ...disable a MenuItem without greying it ?