Спасибо. Подправил скрипт
RClick выделяет файл/ длинный RClick вызывает контекстное меню (c) IgorZ
... local EMPath = win.GetEnv("FARHOME").."\\Plugins\\EMenu\\EMenu.dll"
...
local function OnTimer()
timer:Close() timer = nil
if Mouse.Button==2 and (MouseClickOn==APanel.Path.."\\"..APanel.Current) then
Panel.Select(0,2,1) Plugin.Load(EMPath,0)
far.MacroPost('Plugin.Command("'..EMenu..'","rclk_txt:")')
end
MouseClickOn = ""
end
Я только не понимаю, зачем ВЫГРУЖАТЬ плагин??? (на счёт загрузки - польза есть -фар быстрее стартует, а вот выгружать... память что-ли экономить - ну так в наше время не критично...)
--[[---------------------------------------------------------------------------
Перезапуск плагина Air Brush от Zero Gravity zg
v.0.0.1.0
-------------------------------------------------------------------------------
[L]ctrlshift[F5]
Restart Air brush
-----------------------------------------------------------------------------]]
--Template GUIDS
local function TGUID () return{
cPluginID = "9860393A-918D-450F-A3EA-84186F21B0A2";
}end;
--Set GUIDS
local GUID=TGUID();
local AirBrushPath = win.GetEnv("FARHOME").."\\Plugins\\airbrush\\airbrush.dll"
local function AirBrushExist () return Plugin.Exist(GUID.cPluginID) end
--My ferst function
local function Plugin_AirBrush(command)
far.Message(AirBrushPath,akey(1),"Ok");
plugin.unload(AirBrushPath);
far.Message(AirBrushPath,akey(1),"Ok");
plugin.load(AirBrushPath,1);
end;
-- Macro
Macro {
area="Editor";
key="/[L]ctrlshift[F5]/";
description="Restart Air brush";
condition=AirBrushExist;
action=function()
Plugin_AirBrush();
-- mf.usermenu();
end;
}
-- end Macro
p.s.
Какой-же я некропостер однако...
I've been using Vim for about 2 years now, mostly because I can't figure out how to exit it. (c) I Am Devloper I know nothing except the fact of my ignorance. (с) Socrates
--[[---------------------------------------------------------------------------
Перезапуск плагина Air Brush от Zero Gravity zg
v.0.0.1.0
-------------------------------------------------------------------------------
[L]ctrlshift[F5]
Restart Air brush
-----------------------------------------------------------------------------]]
--Template GUIDS
local function TGUID () return{
cPluginID = "9860393A-918D-450F-A3EA-84186F21B0A2";
}end;
--Set GUIDS
local GUID=TGUID();
local AirBrushPath = win.GetEnv("ConEmuDir").."\\Plugins\\airbrush\\bin64\\airbrush.dll"
local function AirBrushExist () return Plugin.Exist(GUID.cPluginID) end
--My ferst function
local function Plugin_AirBrush(command)
far.Message(AirBrushPath,"Restart","Ok");
-- plugin.unload(AirBrushPath);
far.MacroCallFar(0x80C53,AirBrushPath)
-- far.Message(AirBrushPath,akey(1),"Ok");
-- plugin.load(AirBrushPath,1);
far.MacroCallFar(0x80C51,AirBrushPath,1);
end;
-- Macro
Macro {
area="Editor";
key="/[L]CtrlShiftF5/";
description="Restart Air brush";
condition=AirBrushExist;
action=function()
Plugin_AirBrush();
-- mf.usermenu();
end;
}
-- end Macro
I've been using Vim for about 2 years now, mostly because I can't figure out how to exit it. (c) I Am Devloper I know nothing except the fact of my ignorance. (с) Socrates