Dynamic menus/actions in Delphi -


I have an app with a submenu of each location with unique shortcuts so far this submenu is stable but often a new menu Need to add a location and assign a new shortcut. There is a Unit Client Data in the application, which has a Tutorial Manager in which the buttons, menus, and its submenu keep the necessary actions.

So I should be able to convert this submenu to respectively. All the places are in the database. I think action should be taken in the action manager in submenu.

Besides, there is a shortcut-editor for all actions, so each user can create their own personal shortcuts, those shortcuts are saved in a text file in the private file directory.

There are 3 places in it, which should be replaced.

  • System modules Here, I can add, edit and delete locations in the database that will be in the submenu.
  • Action Manager keeps all functions for this submenu, it also has shortcuts and can load / save shortcuts from a text file.
  • The plan module uses submenu for these places, it must create submenu from the locations in the database and assign the correct shortcut to them.

I have started the implementation but I am not sure I am on the right track. It is important that the action in the ActionManager is in sync when the list of locations is edited in the data module. I'm not sure that I have designed the way to add, edit, and delete tasks in ActionManager in runtime.

Other comments and possible improvements are welcome!

Regards

Adding or removing actions on the runtime is a bit behind you have a new TContainedAction Create, then set up your ActionList property in your list. To delete it from the list, either set ActionList: = Zero , or. Action-free

Everything is done by action, not in the list. You can get actions from the list with the properties of the list actions, or you can calculate the list if you are using the Delphi version which supports the for..in loop .

You can get more information by investigating the source in Actnlist.pas. It is big and do not hesitate; Only 1162 lines for the D2009 version


Comments

Post a Comment

Popular posts from this blog

python - Overriding the save method in Django ModelForm -

I'm having trouble overriding a ModelForm save method. I get this error I'm: Exception type: TypeErier Exception Value: Save () found an unexpected keyword argument 'committed' My intentions include a form 3 fields Submit several values ​​for, then create an object for each combination of those areas, and to save each object file models.py class collarsult type (models.Model): id = model. AutoField (db_column = 'icontact_result_code_type_id', primary_key = true) callResult = models.ForeignKey ( 'CallResult', db_column = 'icontact_result_code_id') campaign = models.ForeignKey ( 'campaign', db_column = 'icampaign_id') CALLTYPE = models.ForeignKey ( 'CALLTYPE', db_column = 'icall_type_id') agent = models.BooleanField (db_column = 'bagent', default = true) teamLeader = models.BooleanField (db_column = 'bTeamLeader', default = true) active = models.BooleanField (db_column = Django.form...
Read more

html - CSS autoheight, but fit content to height of div -

I have a div in which there are three children- div in the left and middle div: float: left while true: float: true because it is my layout Actually will spoil, I've used ClearFix Hack: .cf {zoom: 1; }. Cf: First,. Cf: {content: ""; Display: Table; }. Cf: After {clear: both; } It still works, but I want to be the right div an indicator. So it should fill 100% of the parent unit of height. How can I complete this? PS is the full code: & Lt; / Div & gt; & Lt; Div class = "mobile_content" & gt; & Lt; H5 & gt; {{Data.titel}} & lt; / H5> & Lt; Table & gt; & Lt; TR & gt; & Lt; Th & gt; Komponist: & lt; / Th & gt; & Lt; TD & gt; {{Data.komponist}} & lt; / TD & gt; & Lt; / TR & gt; & Lt; TR & gt; & Lt; Th & gt; Instrument: & lt; / Th & gt; & Lt; TD & gt; {{Data.instrumente}} & lt; / TD & gt; & Lt; / TR & gt;...
Read more

qt - How to prevent QAudioInput from automatically boosting the master volume to 100%? -

I have been trying to use Qt5 multimedia to record audio with QAudioInput, however, when I see If QAudioInput is started, it increases the master volume of my sound device to 100%. How can I prevent QAudioInput from changing the master volume? My current development platform is Linux with PalsAdio (with flat audio disabled). How can I use QAudioInput : QAudioDeviceInfo device_info = QAudioDeviceInfo :: defaultInputDevice (); QAudio format format; Format.setSampleRate (44100); Format.setChannelCount (1); Format.setSampleSize (16); Format.setCodec ("Audio / PCM"); Format.setSampleType (QAudioFormat :: SignedInt); Format.setByteOrder (QAudioFormat :: LittleEndian); Std :: cout & lt; & Lt; Device_info.deviceName (). ToUtf8 (). ConstData () & lt; & Lt; Std :: endl; QAudioInput * default_device = new QAudioInput (device_info, format); QIODevice * default_io_device = default_device-> Start (); a QAudioInput.setVolume () method is not you I ...
Read more