Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: WinAPI и системное программирование > Задержка в PopUp Menu

Автор: Keeper89 30.4.2009, 00:00

Доброго времени суток!

Возможно ли для собственного приложения поменять время открытия контекстного меню (настроить произвольную задержку)?

Заранее спасибо.

Автор: Romikgy 30.4.2009, 10:31

непонятен смысл вопроса
может так хотелось ?

Код


procedure TForm1.FormCreate(Sender: TObject);
begin
  PopupMenu1.AutoPopup := False;
end;

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

begin
 Sleep( задержка );
  PopupMenu1.Popup(X, Y);
end;

Автор: Keeper89 30.4.2009, 14:16

Цитата(Romikgy @ 30.4.2009, 10:31

)

может так хотелось ?

Romikgy, нет. Хотелось изменить время задержки выпадания подменю (например, как это настраивается для меню Пуск в Windows).

Автор: Romikgy 30.4.2009, 16:11

все равно не понятно ,
в винде был параметр , а в приложении зачем? вариант который я дал задержку выставляешь сам или без нее , не понятен вопрос и не понятно зачем

Автор: Keeper89 30.4.2009, 18:15

Цитата(Romikgy @ 30.4.2009, 16:11

)

вариант который я дал задержку выставляешь сам или без нее , не понятен вопрос и не понятно зачем

Задержка для открытия вложенных подменю, при чем тут вариант с задержкой "всплывания" всего PopUp Menu.

Цитата(Romikgy @ 30.4.2009, 16:11

)

в винде был параметр , а в приложении зачем?

Чтобы изменить параметры только своего меню.

Автор: Romikgy 30.4.2009, 18:42

Ув. Keeper89, в первом посте надо упоминать о

Цитата(Keeper89 @ 30.4.2009, 17:15

)

вложенных подменю

Автор: Romikgy 30.4.2009, 20:50

WM_INITMENUPOPUP
WM_DRAWITEM

перехват этих сообщений и вызов когда надо

PS возможно не все сообщения я перечислил для данной операции

Автор: Keeper89 30.4.2009, 22:10

Цитата(Romikgy @ 30.4.2009, 18:42

)

Ув. Keeper89, в первом посте надо упоминать о

Пардон, действительно не совсем точно выразился.

Цитата(Romikgy @ 30.4.2009, 20:50

)

WM_INITMENUPOPUP
WM_DRAWITEM

Спасибо, посмотрю.