AkelPad

Posted: **Wed Aug 17, 2011 11:28 am**

se7h

Умолчания ToolBar'а wrote:-"CodeFold list show/hide" Call("Coder::CodeFold", 1) Icon("%a\AkelFiles\Plugs\Coder.dll", 3)

Posted: **Wed Aug 17, 2011 11:46 am**

1. Глюк с вертикальным расположением пункта MDIDOCUMENTS - он всегда самый нижний в меню. Там же глюк с разделителем под Win7 - выглядит не так как все остальные разделители.

2. ContextMenu::Favorites: Для файлов с Относительными путями или с Переменными окружения
- для "галочки" проверять результирующий путь;
- для удалить - не проверять;
- для добавить - не проверять.

3. Добавить функционал Разделителей и Подменю.

4. Добавить горячие клавиши при редактировании контекстного меню:
- Tab = вставить табуляцию (так ли часто необходим переход по элементам окна с помощью клавиши табуляция?);
- Ctrl+S = применить (не плохо бы, кстати, сделать и кнопку Применить);
- Ctrl+Enter = сохранить и закрыть окно.

Instructor wrote:se7h
Умолчания ToolBar'а wrote:-"CodeFold list show/hide" Call("Coder::CodeFold", 1) Icon("%a\AkelFiles\Plugs\Coder.dll", 3)

А так - всегда не нажата

Posted: **Wed Aug 17, 2011 1:05 pm**

Instructor wrote:se7h
Умолчания ToolBar'а wrote:-"CodeFold list show/hide" Call("Coder::CodeFold", 1) Icon("%a\AkelFiles\Plugs\Coder.dll", 3)

хорошая шутка

а если серьёзно?

Posted: **Thu Aug 18, 2011 2:24 pm**

[Yustas.NeO] wrote:1. Глюк с вертикальным расположением пункта MDIDOCUMENTS - он всегда самый нижний в меню. Там же глюк с разделителем под Win7 - выглядит не так как все остальные разделители.

viewtopic.php?p=10633#p10633

Code: Select all
"Список сворачивания" +Call("Coder::CodeFold", 1) Icon("%a\AkelFiles\Plugs\Coder.dll", 3)
не пойму, почему эта кнопка всегда выглядит нажатой?

Выглядит нажатой, т.к. "Coder::CodeFold" работает.

Posted: **Thu Aug 18, 2011 3:16 pm**

Выглядит нажатой, т.к. "Coder::CodeFold" работает.

а сделать в зависимости от отображения панели можно?

с подсветкой цветами классно получилось

Posted: **Thu Sep 01, 2011 4:36 am**

Добавлено: дополнительный параметр во внешний вызов ContextMenu::Show с кодом 1, для открытия только указанного подменю.

Added: additional parameter to an external call ContextMenu::Show with code 1, to open only the specified submenu.

ContextMenu plugin v10.4

Posted: **Fri Sep 09, 2011 10:54 am**

Instructor, спасибо за последнее обновление, теперь можно без дубликатов.
Ещё один вопрос - можно ли в окне редактирования меню, как-то увеличить шрифт? К сожалению глаза не всё видят

Posted: **Fri Sep 09, 2011 11:08 am**

К сожалению глаза не всё видят

Знакомая проблема. Имею три решения:
1. Win+U и пустить экранную лупу(или другие подобные софтины)
2. ZoomIt (sysinternals.com)
3. Свойства экрана - Параметры - Дополнительно - Масштаб шрифта поставить больше.

Posted: **Fri Sep 09, 2011 4:37 pm**

Andrey_A_A
4. С помощью ResHacker.exe открыть ContextMenu.dll и в диалогах [Dialog] изменить [FONT 8, "MS Shell Dlg"] с 8-го на 10-й [FONT 10, "MS Shell Dlg"]. Компилировать скрипт. Сохранить dll.

Posted: **Fri Sep 09, 2011 6:27 pm**

FeyFre и opk44 спасибо за варианты, подожду что скажетInstructor
Если точно не будет внесено в настройку, то через ResHacker.exe,
хотя это не удобно, обновления происходят часто, и каждый раз лазать...
Кстати и в Toolbare тоже такая же проблема, я имею ввиду шрифт окна редактироания

Posted: **Fri Sep 09, 2011 7:11 pm**

Andrey_A_A
5. Using the script. First, run ContextMenu plugin, and then the script.

Code: Select all

var oSys  = AkelPad.SystemFunction();
var hFont = AkelPad.SendMessage(AkelPad.GetEditWnd(), 49 /*WM_GETFONT*/, 0, 0);
var hPlugWnd = oSys.Call("user32::FindWindow" + _TCHAR, 0, "ContextMenu plugin");
var hCtrlWnd;

if (hPlugWnd)
{
  hCtrlWnd = oSys.Call("user32::FindWindowEx" + _TCHAR, hPlugWnd, 0, "RichEdit20" + _TCHAR, 0);
  if (hCtrlWnd)
    AkelPad.SendMessage(hCtrlWnd, 48 /*WM_SETFONT*/, hFont, true);
}

This changes the font, for as it is set in AkelPad.

Posted: **Fri Sep 09, 2011 7:41 pm**

KDJ
у меня ничего не происходит, сделал всё как вы описали
1. Запустил ContextMenu plugin
2. Запустил скрипт

===========================
Заработало!!!
Нужно поменять, чтобы русское название было

Code: Select all

var hPlugWnd = oSys.Call("user32::FindWindow" + _TCHAR, 0, "ContextMenu плагин");

KDJ, огромное спасибо!

Posted: **Fri Sep 09, 2011 8:07 pm**

Andrey_A_A
Oh yes, the plugin is in two language versions - English and Russian.

Posted: **Fri Sep 09, 2011 10:19 pm**

KDJ wrote:5. Using the script. First, run ContextMenu plugin, and then the script.

Now you can run directly from the script: PlugContextMenuAkelFont.js

Posted: **Sat Sep 10, 2011 12:18 pm**

KDJ wrote:Now you can run directly from the script: PlugContextMenuAkelFont.js

Если шрифт подгружается автономно, через плагин Font, то этот скрипт не работает? После перестановки на один из стандартных шрифтов всё равно не заработало. Windows 7 SP1

Andrey_A_A wrote:Если точно не будет внесено в настройку, то через ResHacker.exe, хотя это не удобно, обновления происходят часто, и каждый раз лазать...

Может быть удастся автоматизировать через cmd-файл