Вопросы по теме 'taction'

Добавить новое свойство в действие в TActionList
Как добавить новое опубликованное (для отображения в инспекторе объектов) свойство в действие TActionList в Delphi тип данных свойства - логический. Спасибо.
1417 просмотров
schedule 04.10.2021

Действие набора данных по умолчанию Delphi Tdatasetdelete
Одна из замечательных вещей Delphi - TActionlist. Еще лучше - стандартные TA-действия, такие как TDataset-actions. У меня одна форма с несколькими простыми таблицами. Поэтому я позволил Delphi решить, какой источник данных / таблица активен с...
492 просмотров
schedule 13.07.2022

Как я могу узнать, кто инициировал действие в Delphi?
Когда возникает событие TAction, «Отправитель» всегда является самим действием. Обычно это наиболее полезно, но можно ли каким-то образом узнать, кто инициировал событие OnExecute действия? Пример Допустим, у вас есть форма со следующим:...
11448 просмотров
schedule 05.12.2022

Как я могу обрабатывать сочетание клавиш, когда моя программа не активна?
Это нормально, если я использую его так... для нескольких событий? unit Unit4; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Clipbrd; type TForm4 = class(TForm) procedure...
4506 просмотров
schedule 04.07.2023

Обработчик простоя Delphi срабатывает только при перемещении мыши
У меня есть обработчик OnIdle в моем приложении D2006. С этим кодом: procedure TMainForm.ApplicationEvents1Idle(Sender: TObject; var Done: Boolean); begin Inc (IdleCalls) ; Sleep (10) ; Done := False ; end ; приложение работает без сбоев,...
2866 просмотров

Delphi: изображение действия не отображается на кнопке инструмента
Все на раме. У меня есть список действий, есть действие с изображением, изображение появляется в действии. Я назначил действие кнопке инструмента, но изображение на ней не появляется. Почему? Делфи ХЕ. Спасибо!
1903 просмотров
schedule 23.01.2023

Как добавить раскрывающееся меню к элементу действия во время выполнения
Я использую следующий метод для создания ActionClient с действием во время выполнения. procedure TMainForm.AddToProjectHistory(Path: string); var NewOption: TAction; ActionClient: TActionClientItem; begin NewOption :=...
2394 просмотров
schedule 08.05.2023