|
Вопрос # 536/ вопрос открыт / |
|
Здравствуйте, уважаемые эксперты! Как мне сохранить горячие клавиши из HotKey в ini файл и затем его прочитать обратно. Заранее спасибо.
 |
Вопрос задал: Яковлев Николай Сергеевич (статус: Посетитель)
Вопрос отправлен: 27 апреля 2007, 08:39
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: min@y™
Для хранения комбинаций горячих клавиш (и вообще возможных действий юзера) лучше всего использовать TActionList.
Вот пример сохранения/загрузки горячих клавиш для всех Actions из TActionList (в приложении).
Приложение: Переключить в обычный режим- procedure TForm1.LoadFromIni;
- var
- Ini: TIniFile;
- Index: Integer;
- begin
- Ini:= TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini'));
- try
- for Index:= 0 to ActionList.ActionCount - 1 do
- TAction(ActionList.Actions[Index]).ShortCut:=
- Ini.ReadInteger('ShortCuts',
- ActionList.Actions[Index].Name,
- TAction(ActionList.Actions[Index]).ShortCut);
- finally
- Ini.Free;
- end;
- end;
-
- procedure TForm1.SaveToIni;
- var
- Ini: TIniFile;
- Index: Integer;
- begin
- Ini:= TIniFile.Create(ChangeFileExt(ParamStr(0), '.ini'));
- try
- for Index:= 0 to ActionList.ActionCount - 1 do
- Ini.WriteInteger('ShortCuts',
- ActionList.Actions[Index].Name,
- TAction(ActionList.Actions[Index]).ShortCut);
- finally
- Ini.Free;
- end;
- end;
-
-
-
- [ShortCuts]
- Action1=16454
- Action2=16452
- Action3=119
- Action4=16455
- Action5=49224
- Action6=16449
-
 |
Ответ отправил: min@y™ (статус: Доктор наук)
Время отправки: 27 апреля 2007, 09:57
Оценка за ответ: 5
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
