View previous topic :: View next topic |
Author |
Message |
Instructor Site Admin
Joined: 06 Jul 2006 Posts: 6250
|
Posted: Fri Jun 01, 2012 2:48 pm Post subject: |
|
|
Andrey_A_A
Code: | X = "200"
Y = "300"
Name = "MENUFOLDERS"
Call AkelPad.Call("ContextMenu::Show", 1, X, Y, , Name) |
|
|
Back to top |
|
 |
Andrey_A_A
Joined: 03 Jun 2010 Posts: 665 Location: Сочи, Хоста
|
Posted: Sat Jun 02, 2012 7:33 am Post subject: |
|
|
Instructor
То, что описано выше работает, но не удаётся передать в скрипте
ShowMenuLRTB.vbs
Code: | ' ShowMenuLRTB.vbs
With WScript
Cnt = .Arguments.Count
If Cnt > 0 Then
Poz = .Arguments(0)
If Cnt > 1 Then Name = .Arguments(1)
End If
End With
lpRect = AkelPad.MemAlloc(16)
If lpRect > 0 Then
If AkelPad.SystemFunction().Call("user32::GetWindowRect", AkelPad.GetEditWnd(), lpRect) Then
pRect = CLng(lpRect)
LRect = AkelPad.MemRead(pRect, 3)
TRect = AkelPad.MemRead(pRect + 4, 3)
RRect = AkelPad.MemRead(pRect + 8, 3)
BRect = AkelPad.MemRead(pRect + 12, 3)
End If
End If
Select Case Poz
Case 1 X = LRect : Y = TRect
' Case 2
' Case 3
' Case 4
End Select
X = Chr(34) & X & Chr(34)
Y = Chr(34) & Y & Chr(34)
Call AkelPad.Call("ContextMenu::Show", 1, X, Y, , Name)
|
Кнопка вызова
Code: | -"ShowMenuLRTB.vbs" Call("Scripts::Main", 1, "ShowMenuLRTB.vbs", `"1" "MENUSMALE"`) |
Меню выскакивает в верхнем левом углу экрана... |
|
Back to top |
|
 |
KDJ
Joined: 06 Mar 2010 Posts: 1929 Location: Poland
|
Posted: Sat Jun 02, 2012 10:54 am Post subject: |
|
|
Andrey_A_A
Instead of:
Code: | X = Chr(34) & X & Chr(34)
Y = Chr(34) & Y & Chr(34) | should be:
Code: | X = "" & X
Y = "" & Y | or:
Code: | X = CStr(X)
Y = CStr(Y) |
|
|
Back to top |
|
 |
Andrey_A_A
Joined: 03 Jun 2010 Posts: 665 Location: Сочи, Хоста
|
Posted: Sat Jun 02, 2012 1:55 pm Post subject: |
|
|
KDJ, огромное спасибо - заработало!!! |
|
Back to top |
|
 |
Instructor Site Admin
Joined: 06 Jul 2006 Posts: 6250
|
Posted: Sun Jun 03, 2012 12:46 pm Post subject: |
|
|
Andrey_A_A wrote: | ShowMenuLRTB.vbs:
Code: | pRect = CLng(lpRect) |
| Теперь в Scripts такого не требуется. |
|
Back to top |
|
 |
Instructor Site Admin
Joined: 06 Jul 2006 Posts: 6250
|
Posted: Sun Jun 03, 2012 12:49 pm Post subject: |
|
|
Добавлено: возможность отображения меню ContextMenu::Show в:
- левом верхнем углу окна редактирования;
- правом верхнем угла окна редактирования;
- правом нижнем угла окна редактирования;
- левом нижнем угла окна редактирования;
- позиции под кареткой окна редактирования.
Added: possibility to display ContextMenu::Show menu in the:
- top-left corner of the edit window;
- top-right corner of the edit window;
- right-bottom corner of the edit window;
- left-bottom corner of the edit window;
- position under the caret of the editing window.
ContextMenu plugin v12.4 |
|
Back to top |
|
 |
Andrey_A_A
Joined: 03 Jun 2010 Posts: 665 Location: Сочи, Хоста
|
Posted: Mon Jun 04, 2012 9:56 am Post subject: |
|
|
Quote: | возможность отображения меню ContextMenu::Show в:
- левом верхнем углу окна редактирования; ... |
Instructor, Спасибо! |
|
Back to top |
|
 |
DV
Joined: 16 Nov 2006 Posts: 1015 Location: Kyiv, Ukraine
|
Posted: Fri Jun 22, 2012 1:45 pm Post subject: |
|
|
Настройки Меню вкладок
"" Command(4101)
SEPARATOR
"" Command(4318)
"" Command(4319)
"" Command(4320)
SEPARATOR
"" Command(4105)
"" Command(4106)
"" Command(4110)
"" Command(4111)
Показывает
Новый
--------
Закрыть
Закрыть все
Закрыть все, кроме активного
--------
Always on top
Сохранить как
Сохранить все
Сохранить все как...
Вопрос: каким образом строка "Сохранить" превратилась в "Always on top"?
P.S. Плагин Sessions должен быть в автозагрузке и открывать хотя бы два файла при старте AkelPad. Без него дефект пропадает. |
|
Back to top |
|
 |
FeyFre
Joined: 07 Aug 2007 Posts: 2240 Location: Vinnitsa, Ukraine
|
Posted: Fri Jun 22, 2012 2:35 pm Post subject: |
|
|
DV
У меня норм.(Условие с Sessions соблюдаю) |
|
Back to top |
|
 |
Instructor Site Admin
Joined: 06 Jul 2006 Posts: 6250
|
Posted: Sat Jun 23, 2012 4:37 am Post subject: |
|
|
DV
Не воспроизводится. Можете выслать/выложить папку с AkelPad'ом? |
|
Back to top |
|
 |
DV
Joined: 16 Nov 2006 Posts: 1015 Location: Kyiv, Ukraine
|
Posted: Sat Jun 23, 2012 4:41 pm Post subject: |
|
|
DV wrote: | Вопрос: каким образом строка "Сохранить" превратилась в "Always on top"? |
Однако, виновным оказался процесс RBTray.exe со своей длл-кой RBHook.dll (http://rbtray.sourceforge.net/). |
|
Back to top |
|
 |
morismoss
Joined: 28 Aug 2008 Posts: 6
|
Posted: Sun Aug 19, 2012 12:29 pm Post subject: |
|
|
Подскажите, как добавить команду показа активной строки "CO_CARETACTIVELINE" в главное меню? |
|
Back to top |
|
 |
Instructor Site Admin
Joined: 06 Jul 2006 Posts: 6250
|
|
Back to top |
|
 |
Andrey_A_A
Joined: 03 Jun 2010 Posts: 665 Location: Сочи, Хоста
|
Posted: Sun Aug 26, 2012 9:06 am Post subject: |
|
|
Instructor
Спасибо Вам за грандиознейшую работу и отзывчивость к пользователям! Отличное отношение - так держать!
Есть ещё одно наблюдение...
Можно ли избежать дублирования групп команд, дабы ContextMenu.ini не распухало.
Так получается что одни и те же куски повторяются и в
- Главном меню
- Меню окна редактирования
- Меню вкладок
...
если хочешь на тулбаре, то приходится прописывать группу и в
"... MENU ..."
{
группа команд
}
Конечно кто-то стремиться, чтобы избегать повторений, но у меня активность работы и желание не терять время не позволяет этого
Более того, если в группу добавляешь ещё команды, то это надо делать и в других менюшках...
Может можно что-нибудь придумать присваивать группе команд какой-нибудь номер/спец.имя/.. , чтобы его можно было использовать везде
Last edited by Andrey_A_A on Sun Aug 26, 2012 12:20 pm; edited 1 time in total |
|
Back to top |
|
 |
Lenchik
Joined: 10 Jan 2011 Posts: 366
|
Posted: Sun Aug 26, 2012 10:17 am Post subject: |
|
|
Andrey_A_A
Поддерживаю (если я правильно понял смысл).
У меня дублированы некоторые еоманды в главном меню и в контекстном (выбор синтаксических тем и тем подсветки). Хотелось бы их редактировать в одном мести и как дополнительный вариант чтобы и по кнопке в тулбаре то же выпадало (пусть даже и с ограничениями на наличие иконок перед текстом). |
|
Back to top |
|
 |
|