Page 36 of 49

Posted: Fri Jun 01, 2012 2:48 pm
by Instructor
Andrey_A_A

Code: Select all

X = "200"
Y = "300"
Name = "MENUFOLDERS"

Call AkelPad.Call("ContextMenu::Show", 1, X, Y, , Name)

Posted: Sat Jun 02, 2012 7:33 am
by Andrey_A_A
Instructor
То, что описано выше работает, но не удаётся передать в скрипте

Code: Select all

' 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: Select all

-"ShowMenuLRTB.vbs" Call("Scripts::Main", 1, "ShowMenuLRTB.vbs", `"1" "MENUSMALE"`)
Меню выскакивает в верхнем левом углу экрана...

Posted: Sat Jun 02, 2012 10:54 am
by KDJ
Andrey_A_A
Instead of:

Code: Select all

X = Chr(34) & X & Chr(34)
Y = Chr(34) & Y & Chr(34)
should be:

Code: Select all

X = "" & X
Y = "" & Y
or:

Code: Select all

X = CStr(X)
Y = CStr(Y)

Posted: Sat Jun 02, 2012 1:55 pm
by Andrey_A_A
KDJ, огромное спасибо - заработало!!!

Posted: Sun Jun 03, 2012 12:46 pm
by Instructor
Andrey_A_A wrote:ShowMenuLRTB.vbs:

Code: Select all

pRect = CLng(lpRect) 
Теперь в Scripts такого не требуется.

Posted: Sun Jun 03, 2012 12:49 pm
by Instructor
Добавлено: возможность отображения меню 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

Posted: Mon Jun 04, 2012 9:56 am
by Andrey_A_A
возможность отображения меню ContextMenu::Show в:
- левом верхнем углу окна редактирования; ...
Instructor, Спасибо!

Posted: Fri Jun 22, 2012 1:45 pm
by DV

"" 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. Без него дефект пропадает.

Posted: Fri Jun 22, 2012 2:35 pm
by FeyFre
DV
У меня норм.(Условие с Sessions соблюдаю)

Posted: Sat Jun 23, 2012 4:37 am
by Instructor
DV
Не воспроизводится. Можете выслать/выложить папку с AkelPad'ом?

Posted: Sat Jun 23, 2012 4:41 pm
by DV
DV wrote:Вопрос: каким образом строка "Сохранить" превратилась в "Always on top"?
Однако, виновным оказался процесс RBTray.exe со своей длл-кой RBHook.dll (http://rbtray.sourceforge.net/).

Posted: Sun Aug 19, 2012 12:29 pm
by morismoss
Подскажите, как добавить команду показа активной строки "CO_CARETACTIVELINE" в главное меню?

Posted: Sun Aug 19, 2012 12:33 pm
by Instructor

Posted: Sun Aug 26, 2012 9:06 am
by Andrey_A_A
Instructor
Спасибо Вам за грандиознейшую работу и отзывчивость к пользователям! Отличное отношение - так держать!

Есть ещё одно наблюдение...
Можно ли избежать дублирования групп команд, дабы ContextMenu.ini не распухало.
Так получается что одни и те же куски повторяются и в
- Главном меню
- Меню окна редактирования
- Меню вкладок
...
если хочешь на тулбаре, то приходится прописывать группу и в

"... MENU ..."
{
группа команд
}

Конечно кто-то стремиться, чтобы избегать повторений, но у меня активность работы и желание не терять время не позволяет этого

Более того, если в группу добавляешь ещё команды, то это надо делать и в других менюшках...

Может можно что-нибудь придумать присваивать группе команд какой-нибудь номер/спец.имя/.. , чтобы его можно было использовать везде

Posted: Sun Aug 26, 2012 10:17 am
by Lenchik
Andrey_A_A
Поддерживаю (если я правильно понял смысл).
У меня дублированы некоторые еоманды в главном меню и в контекстном (выбор синтаксических тем и тем подсветки). Хотелось бы их редактировать в одном мести и как дополнительный вариант чтобы и по кнопке в тулбаре то же выпадало (пусть даже и с ограничениями на наличие иконок перед текстом).