Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ActionManager1.AddAction

Страницы: 1 2 >
asd © (2006-01-13 20:57:00)
Что заполняется в скобках ActionManager1.AddAction(); Привидите, плжалуйста, пример.

asd (2006-01-27 20:00:00) [1]
Программа........
И на том спасибо.

Джо (2006-01-25 22:23:00) [2]
> . Не сложно вам написать алгоритм для
> MainMenuBar и как разместить в определённой категории?

Алгоритм чего? И что разместить?

Имхо, тут постановкой задачи и не пахнет, а если и запахнет, то мне кажется, что она будет выражаться в стиле а) напишите мне программу или б) объясните мне своими словами то, что написано в Справке.

Я ошибаюсь?

asd (2006-01-25 22:14:00) [3]
Кто может написать алгоритм, пожалуйста, помогите.

asd (2006-01-24 18:33:00) [4]
Джо, ты мне поможешь?

asd (2006-01-24 14:05:00) [5]
Просто я с этим только сейчас столкнулся и прочитать это у меня нет возможности.

asd (2006-01-23 20:40:00) [6]
Да, правильно вы меня поняли. Не сложно вам написать алгоритм для
MainMenuBar и как разместить в определённой категории?

Джо (2006-01-23 15:52:00) [7]
Теме уже черт знает сколько времени, а я до сих пор не понял, чего вообще нужно добиться...
Вот этого, или чего? И какой смысл в этом?
// На форме компонент TActionManager, TMainMenu, TButton TForm17 = class(TForm) ActionManager1: TActionManager; Button1: TButton; MainMenu1: TMainMenu; procedure Button1Click(Sender: TObject); private procedure OnCloseAction (Sender: TObject); public end; ... procedure TForm17.OnCloseAction(Sender: TObject); begin Close; end; procedure TForm17.Button1Click(Sender: TObject); var Action: TAction; Mi: TMenuItem; begin Action := TAction.Create(ActionManager1); Action.Caption := 'Close'; Action.OnExecute := OnCloseAction; // вот что можно "написать в скобках" :) ActionManager1.AddAction(Action,nil); Mi := TMenuItem.Create(MainMenu1); Mi.Action := Action; MainMenu1.Items.Add(Mi); end;

Gero (2006-01-23 15:46:00) [8]
Поднимай эту ветку с периодичностью раз в месяц.

asd (2006-01-23 15:34:00) [9]
Помогите, пожалуйста, это же несложный вопрос.

asd (2006-01-22 16:00:00) [10]
Я всё ещё жду...

asd (2006-01-21 19:44:00) [11]
А также новые действия не сохранаются. Жду ответа

asd (2006-01-21 19:43:00) [12]
procedure TForm1.AddActionActionExecute(Sender: TObject);
var
Item: TActionClientItem;
begin
Item := ActionManager1.FindItemByCaption('&Action1');
if Assigned(Item) then
ActionManager1.AddAction(EditCut1, Item);
end;
Как вставить текст в нужную категорию?
В данном алгоритме идёт поиск существующих действий и их вставка, а я хочу, чтобы пользователь сам создавал эти действия под своим именем.

asd (2006-01-20 15:08:00) [13]
Спасибо, что помогли.

Джо (2006-01-19 23:27:00) [14]
> [11] asd © (19.01.06 22:14)
> Да... Я так всё понял... Если понял, то привиди, пожалуйста,
> пример. А то я уже замаился.

В папке Demos есть пример работы с TActionManager в ран-тайм, в том числе, и с его методом AddAction.
Путь к файлу, в котором есть пример использования AddAction:
Demos\ActionBands\main.pas.
В зависимости от версии Делфи этот путь может незначительно меняться, главное, ищи папку ActionBands.

Gero (2006-01-19 23:06:00) [15]
> Скопируй, пожалуйста.

А у тебя что, копипаст сломался?

asd (2006-01-19 22:14:00) [16]
Да... Я так всё понял... Если понял, то привиди, пожалуйста, пример. А то я уже замаился.

Джо (2006-01-19 19:06:00) [17]
TCustomActionManager.AddAction Method

Inserts a new action into an existing actionband.

Class
TCustomActionManager

Syntax

[Delphi] function AddAction(AnAction: TCustomAction; AClient: TActionClient; After: Boolean): TActionClientItem;

Description
AddAction adds an action to an action band. Use this method to insert a new action into an existing actionband. Use FindItemByCaptionand FindItemByActionmethods to locate the position at which you want to insert the new item.

Related Information
TCustomActionManager.LoadFromStream
TCustomActionManager.FileName

asd (2006-01-19 18:45:00) [18]
Скопируй, пожалуйста. Мне срочно этот код нужен. Спасибо

Джо (2006-01-19 00:39:00) [19]
> [7] asd © (18.01.06 20:54)

Скопировать сюда кусок из Справки? Мне не сложно. :)

asd (2006-01-18 20:54:00) [20]
Вот именно. Я так и делал, там нету... Народ, там же две строчки написать, в 1 - создание действия в actionmanager, а во 2 - отображение нового действия в ActionMainMenuBar. Буду очень благодарен за код, а то у меня в большой программе не хватает только этого. Вся надежда на вас.

Страницы: 1 2 >

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »