Вверх ↑
Этот топик читают: Гость
Ответов: 1416
Рейтинг: 97
#91: 2017-11-23 12:19:20 ЛС | профиль | цитата
Упорядочил информацию, чтобы не рыться в постах.
В итоге: https://yadi.sk/d/817y_pAe3PxAEm
В архиве два варианта компонента и примеры.
Один вариант с использованием dll, в другом без dll - библиотека зашита в код.
Варианты идентичны, кому как нравится.
карма: 3

1
Голосовали:andrestudio
Ответов: 85
Рейтинг: 0
#92: 2017-11-28 10:10:15 ЛС | профиль | цитата
Я бы ещё от help'ника желательно на русском не отказался
карма: 0

0
Ответов: 1519
Рейтинг: 175
#93: 2017-11-28 14:17:32 ЛС | профиль | цитата
Не плохо бы иметь доступ к матрице нумерации строк, забивая туда какие-либо свои строковые значения. Бывает при случае нужно.
карма: 1
Не так страшна ошибка, как опасность её не заметить.

0
Ответов: 1416
Рейтинг: 97
#94: 2017-11-29 00:12:16 ЛС | профиль | цитата
Нашел и исправил очень неприятное поведение компонента.
MAV писал(а):
flint2, ... Кода стал тестировать в режиме текста только одно окно, обнаружил что перестала работать функция ScintillaEvents, Msg.message не ловит WM_NOTIFY. Стоит добавить визуальные компоненты StatusBar или TrackBar всё начинает работать. Соответственно без ScintillaEvents не работает фолдинг, маркеры и тд.

То есть, полноценно компонент работал только в сочетании с компонентами StatusBar, или TrackBar, или ToolBar и ещё несколькими.

Очевидно это и приводило к непониманию работы компонента.
Теперь всё исправлено и компонент работает автономно. Теперь вопросов возникать не должно.
В архив положил Help на английском, и что можно было найти на русском, собрал все в один scintilla.html.
+ информация для подсветки каждого языка и пользовательской подсветки.

Что касается Help, то он скорее нужен для разработчиков, чем для кубикостроителей. Если информации в папке Help кому-то не достаточно, Всё можно найти в интернете и схемы подсветки тоже.
Что касается компонента, несмотря на обилие точек и начальных установок, всё предельно просто.

ser_davkin, доступа к матрице нумерации строк нет. Это внутренняя функция dll.
Тем не менее способ нашел, но тогда:
1. Боковая панель растягивается на длину всего слова + 2 знака, а если слово длинное?
2. В матрице хранятся не строковые значения, смотри начало файла scintilla.html. По этому надо уже в компоненте сделать список строк и хранить там пометки.
3. Всё это дело надо сохранять в отдельном файле.
В общем, малой кровью не отделаться.
Надо думать. Вопрос цены/качества.

Архив перезалил. https://yadi.sk/d/817y_pAe3PxAEm

Редактировалось 6 раз(а), последний 2017-11-29 01:14:43
карма: 3

0
Ответов: 18
Рейтинг: 0
#95: 2017-12-01 01:06:21 ЛС | профиль | цитата
Спасибо! У меня все функции включались при добавлении RichEdit, случайно наткнулся. . Теперь всё ОК.
По ссылке две схемы, делал для себя, а я "совсем начинающий", но, может быть, будут полезны еще кому-то. (Настройка стилей)
https://yadi.sk/d/PSd49Z2M3QD29u
карма: 0

0
Ответов: 4413
Рейтинг: 472
#96: 2017-12-01 06:31:29 ЛС | профиль | цитата
flint2, и что помешало сделать переходник

flint2 писал(а):
Ты имел ввиду это?


begin
inherited Create;
Callback.POPEDX := $5A;
Callback.MOVEAX := $B8;
Callback.SelfPtr :=Self;
Callback.PUSHEAX := $50;
Callback.PUSHEDX := $52;
Callback.JMP := $E9;
Callback.JmpOffset := Integer(@........) - Integer(@Callback.JMP) - 5;
end;


Думаю что зависимость от дополнительных контролов отпала бы сразу
карма: 4

0
Ответов: 1416
Рейтинг: 97
#97: 2017-12-01 10:12:20 ЛС | профиль | цитата
andrestudio, а зачем делать переходник, если достаточно просто ошибку исправить?
Всё гораздо проще:
// Control := _NewControl(Fparent, 'SCINTILLA', WS_CHILD or WS_VISIBLE, false, nil);
Control := _NewCommonControl(Fparent, 'SCINTILLA', WS_CHILD or WS_VISIBLE, false, nil);


Add(MainForm,9524590,238,91)
{
Width=576
Height=481
}
Add(Scintilla,13351448,399,203)
{
Width=568
Height=454
Align=5
Font=[Courier New,11,0,0,204]
Layout="mainh"
HeightScale=99
Strings=#20:require "CLRPackage"|29:import "System.Windows.Forms"|23:import "System.Drawing"|59:local Directory = luanet.import_type("System.IO.Directory")|49:local Path = luanet.import_type("System.IO.Path")|49:local File = luanet.import_type("System.IO.File")|27:local append = table.insert|39:local ferr = io.stderr -- for debugging|0:|61:----------- some generally useful functions -----------------|78:--- Can be used to set multiple properties of an object, by supplying a table.|59:-- e.g. set(button,{Text="Click Me",Dock = DockStyle.Fill})|24:function set (obj,props)|30: for k,v in pairs(props) do|29: if type(k) == 'string' then|13: obj[k] = v|5: end|4: end|3:end|0:|60:--- works like AddRange, except it takes a table of controls|43:-- e.g add_controls(form,{button1,button2})|34:function add_controls (ctrl,ctrls)|30: for k,v in pairs(ctrls) do|25: ctrl.Controls:Add(v)|4: end|3:end|0:|38:function ShowMessageBox (caption,icon)|42: icon = icon or MessageBoxIcon.Information|61: MessageBox.Show(caption,arg[0],MessageBoxButtons.OK,icon)|3:end|0:|28:function ShowError (caption)|48: ShowMessageBox(caption,MessageBoxIcon.Error)|3:end|0:|62:---------- Utility function for creating classes -------------|44:--- Does single-inheritance and _delegation_|20:function class(base)|94: local c = {} -- a new class instance, which is the metatable for all objects of this type|54: local mt = {} -- a metatable for the class instance|20: local userdata_base|20: if base == nil then|7: --nada|34: elseif type(base) == 'table' then|55: -- our new class is a shallow copy of the base class!|27: for i,v in pairs(base) do|11: c[i] = v|5: end|16: c._base = base|48: -- inherit the 'not found' handler, if present|48: if c._handler then mt.__index = c._handler end|4: end|56: -- the class will be the metatable for all its objects,|46: -- and they will look up their methods in it.|14: c.__index = c|0:|60: -- expose a ctor which can be called by <classname>(<args>)|36: mt.__call = function(class_tbl,...)|15: local obj= {}|21: setmetatable(obj,c)|94: -- nice alias for the base class ctor (which you have to call explicitly if you have a ctor)|39: if base then c.super = base._init end|17: if c._init then|19: c._init(obj,...)|6: else|66: -- make sure that any stuff from the base class is initialized!|30: if base and base._init then|23: base._init(obj,...)|6: end|5: end|12: return obj|4: end|0:|84: -- Call Class.catch to set a handler for methods/properties not found in the class!|28: c.catch = function(handler)|22: c._handler = handler|22: mt.__index = handler|4: end|15: c._init = ctor|30: c.is_a = function(self,klass)|30: local m = getmetatable(self)|55: if not m then return false end --*can't be an object!|12: while m do|37: if m == klass then return true end|24: m = rawget(m,'_base')|5: end|14: return false|4: end|27: c.class_of = function(obj)|22: return c.is_a(obj,c)|4: end|86: -- any object can have a specified delegate which is called with unrecognized methods|67: -- if _handler exists and obj[key] is nil, then pass onto handler!|32: c.delegate = function(self,obj)|23: local me = self|32: mt.__index = function(tbl,key)|31: -- handling fields!|48: local getter = rawget(c,"Get_"..key)|48: if getter then return getter(me) end|40: getter = rawget(me,"_"..key)|44: if getter then return getter end|26: local method = obj[key]|17: if method then|62: -- it exists in the delegate! First check if it's callable|69: if type(method) == 'function' or getmetatable(method).__call then|30: return function(self,...)|28: return method(obj,...)|8: end|34: else -- otherwise, just return|18: return method|7: end|28: elseif self._handler then|33: return self._handler(tbl,key)|6: end|5: end|39: c.__newindex = function(self,key,val)|48: local setter = rawget(c,"Set_"..key)|26: if setter then|32: setter(self,val)|16: else|30: obj[key] = val|15: end|5: end|4: end|19: setmetatable(c,mt)|9: return c|3:end|0:|56:----------- Creating Menus -----------------------------|0:|42:local ShortcutType = Shortcut.F1:GetType()|0:|33:local function parse_shortcut (s)|13: local res|59: if pcall(function() -- we have to catch the exception!|46: res = Enum.Parse(ShortcutType,s,false)|28: end) then return res end|3:end|0:|40:local function add_menu_items (item,tbl)|23: for i = 1,#tbl,2 do|61: item.MenuItems:Add(create_menu_item(tbl[i],tbl[i+1]))|7: end|3:end|0:|40:function create_menu_item (label,action)|27: local item = MenuItem()|45: local shortcut = label:match('%((%w+)%)')|20: if shortcut then|49: local shortcut = parse_shortcut(shortcut)|53: if shortcut then item.Shortcut = shortcut end|37: label = label:match('(.+)%(')|7: end|21: item.Text = label|38: if type(action) == 'function' then|30: item.Click:Add(action)|8: else|35: add_menu_items(item,action)|7: end|15: return item|3:end|0:|24:function main_menu (tbl)|25: local mm = MainMenu()|26: add_menu_items(mm,tbl)|13: return mm|3:end|0:|25:function popup_menu (tbl)|28: local mm = ContextMenu()|26: add_menu_items(mm,tbl)|13: return mm|3:end|0:|78:-- a useful function for creating menu callbacks to methods of a given object.|25:function method (obj,fun)|21: return function()|10: fun(obj)|4: end|3:end|0:|42:local function populate_control (form,tbl)|14: set(form,tbl)|59: if #tbl > 0 then -- has an array part, containing controls|19: if #tbl == 1 then|29: table.insert(tbl,1,"Fill")|5: end|13: local i = 1|20: while i <= #tbl do|19: local c = tbl[i]|13: local dock|30: if type(c) == 'string' then|12: dock = c|16: c = tbl[i+1]|13: i = i + 1|28: c.Dock = DockStyle[dock]|6: end|23: form.Controls:Add(c)|12: i = i + 1|5: end|4: end|15: return form|3:end|0:|22:function LuaForm (tbl)|36: return populate_control(Form(),tbl)|3:end|0:|23:function LuaPanel (tbl)|37: return populate_control(Panel(),tbl)|3:end|0:|0:|45:---------------- Stream Layout --------------|22:StreamLayout = class()|0:|34:function StreamLayout:_init(panel)|18: self.xsep = 10|19: self.X = self.xsep|19: self.Y = self.xsep|19: self.panel = panel|20: self.newline = true|14: self.maxX = 0|19: self.maxHeight = 0|17: self.labels = {}|27: self.panel:SuspendLayout()|3:end|0:|33:function StreamLayout:Add(c,like)|39: if like then self.X = like.Left end|34: c.Location = Point(self.X,self.Y)|27: self.panel.Controls:Add(c)|38: self.X = self.X + c.Width + self.xsep|39: self.maxX = math.max(self.maxX,self.X)|51: self.maxHeight = math.max(self.maxHeight,c.Height)|21: if self.newline then|17: self.firstC = c|22: self.newline = false|20: self.maxHeight = 0|4: end|3:end|0:|37:function StreamLayout:AddRow(lbl,...)|18: local row = {...}|15: if lbl then|23: local label = Label()|23: label.AutoSize = true|18: label.Text = lbl|19: row.label = label|25: append(self.labels,row)|17: self:Add(label)|4: end|26: for i,c in ipairs(row) do|13: self:Add(c)|4: end|15: self:NextRow()|3:end|0:|30:function StreamLayout:Height()|43: return self.Y + self.maxHeight + self.xsep|3:end|0:|29:function StreamLayout:Width()|20: return self.maxX|3:end|0:|31:function StreamLayout:NextRow()|26: self.Y = self:Height()|19: self.X = self.xsep|20: self.newline = true|3:end|0:|31:function StreamLayout:Finish ()|19: local width = 0|36: for i,row in ipairs(self.labels) do|41: width = math.max(width,row.label.Width)|4: end|60: if width > 0 then -- i.e there is an explicit row of labels|37: for i,row in ipairs(self.labels) do|24: local lbl = row.label|28: for j,c in ipairs(row) do|41: c.Left = c.Left + (width - lbl.Width)|60: self.maxX = math.max(self.maxX,c.Left+c.Width+self.xsep)|6: end|5: end|4: end|31: self.panel:ResumeLayout(false)|3:end|0:|20:LayoutForm = class()|0:|28:function LayoutForm:_init ()|19: self.form = Form()|38: self.layout = StreamLayout(self.form)|24: self.hasButtons = false|16: self.ok = false|20: self.cancel = false|28: self.finishedLayout = false|68: -- this method can only be called once we've set up our own fields!|25: self:delegate(self.form)|51: self.FormBorderStyle = FormBorderStyle.FixedDialog|25: self.MaximizeBox = false|25: self.MinimizeBox = false|3:end|0:|33:function LayoutForm:AddControl(c)|22: self.layout:Add(c)|3:end|0:|42:function LayoutForm:AddControlRow(lbl,...)|31: self.layout:AddRow(lbl,...)|3:end|0:|38:function LayoutForm:AddTextBoxRow(lbl)|26: local textBox = TextBox()|32: self:AddControlRow(lbl,textBox)|15: return textBox|3:end|0:|35:function LayoutForm:Btn (title,res)|22: local b = Button()|15: b.Text = title|31: if res == DialogResult.OK then|23: self.AcceptButton = b|39: elseif res == DialogResult.Cancel then|23: self.CancelButton = b|4: end|19: self.layout:Add(b)|23: self.hasButtons = true|9: return b|3:end|0:|33:function LayoutForm:OkBtn (title)|42: return self:Btn(title,DialogResult.OK)|3:end|0:|37:function LayoutForm:CancelBtn (title)|46: return self:Btn(title,DialogResult.Cancel)|3:end|0:|29:function LayoutForm:NextRow()|25: self.layout:NextRow()|3:end|0:|31:function LayoutForm:OkCancel ()|51: if not self.layout.newline then self:NextRow() end|26: self.ok = self:OkBtn "OK"|38: self.cancel = self:CancelBtn "Cancel"|3:end|0:|26:function LayoutForm:OnOK()|12: return true|3:end|0:|40:function LayoutForm:CenterControls (...)|15: local w = 0|20: local ctrls = {...}|28: for _,c in ipairs(ctrls) do|20: w = w + c.Width|4: end|52: local diff = (self.layout:Width() - w)/(#ctrls + 1)|16: local xx = diff|28: for _,c in ipairs(ctrls) do|16: c.Left = xx|26: xx = xx + c.Width + diff|4: end|3:end|0:|34:function LayoutForm:FinishLayout()|31: if not self.hasButtons then|17: self:OkCancel()|42: self:CenterControls(self.ok,self.cancel)|30: self.ok.Click:Add(function()|22: if self:OnOK() then|39: self.DialogResult = DialogResult.OK|7: else|41: self.DialogResult = DialogResult.None|6: end|6: end)|4: end|27: local layout = self.layout|16: layout:Finish()|56: self.ClientSize = Size(layout:Width(), layout:Height())|27: self.finishedLayout = true|3:end|0:|35:function LayoutForm:ShowDialogOK ()|35: if not self.finishedLayout then|21: self:FinishLayout()|4: end|44: return self:ShowDialog() == DialogResult.OK|3:end|0:|61:------------------- Converters ------------------------------|96:-- These classes convert values between controls and Lua values, and provide basic verification,|63:-- like ensuring that a string is a valid number, for instance.|72:-- They provide an appropriate control for editing the particular value.|19:Converter = class()|0:|29:function Converter:Control ()|24: self.box = TextBox()|16: return self.box|3:end|0:|27:function Converter:Read (c)|17: return c.Text|3:end|0:|33:function Converter:Write (c,text)|17: c.Text = text|3:end|0:|34:NumberConverter = class(Converter)|0:|33:function NumberConverter:Read (c)|19: local txt = c.Text|31: local value = tonumber(txt)|75: if not value then return nil, "Cannot convert '"..txt.."' to a number" end|13: return value|3:end|0:|32:BoolConverter = class(Converter)|0:|33:function BoolConverter:Control ()|21: return CheckBox()|3:end|0:|31:function BoolConverter:Read (c)|20: return c.Checked|3:end|0:|36:function BoolConverter:Write (c,val)|19: c.Checked = val|3:end|0:|32:ListConverter = class(Converter)|0:|35:function ListConverter:_init (list)|20: self.list = list|3:end|0:|33:function ListConverter:Control ()|21: local c = ComboBox()|31: if not self.list.Editable then|46: c.DropDownStyle = ComboBoxStyle.DropDownList|4: end|35: for i,item in ipairs(self.list) do|19: c.Items:Add(item)|4: end|9: return c|3:end|0:|31:function ListConverter:Read (c)|30: local val = c.SelectedItem|33: if not val then val = c.Text end|11: return val|3:end|0:|36:function ListConverter:Write (c,val)|24: c.SelectedItem = val|3:end|0:|32:FileConverter = class(Converter)|0:|43:function FileConverter:_init (reading,mask)|79: -- the filter is in a simplified form like 'Lua Files (*.lua)|C# Files (*.cs)"|47: -- this will expand it into the required form.|52: self.filter = mask:gsub("%((.-)%)",function(pat)|28: return "("..pat..")|"..pat|5: end)|23: self.reading = reading|3:end|0:|95:-- ExtraControl is an optional method which gives a converter the opportunity of adding another|95:-- control to the row after the primary control. In this case, we create a file browser button.|38:function FileConverter:ExtraControl ()|24: local btn = Button()|21: local box = self.box|15: btn.Width = 30|16: btn.Text = ".."|25: btn.Click:Add(function()|77: -- if possible, open the file browser in the same directory as the filename|29: local path = self:Read(box)|31: if not File.Exists(path) then|41: path = Directory.GetCurrentDirectory()|6: else|37: path = Path.GetDirectoryName(path)|5: end|92: -- depending on whether we want a file to read or write ("Save as"), pick the file dialog.|15: local filebox|47: if self.reading then filebox = OpenFileDialog|36: else filebox = SaveFileDialog end|23: local dlg = filebox()|26: dlg.Filter = self.filter|29: dlg.InitialDirectory = path|45: if dlg:ShowDialog() == DialogResult.OK then|31: self:Write(box,dlg.FileName)|5: end|5: end)|11: return btn|3:end|0:|100:-- Note an important convention: this converter puts the full file path in the text box's Tag field,|0:|36:function FileConverter:Write (c,val)|34: c.Text = Path.GetFileName(val)|12: c.Tag = val|3:end|0:|31:function FileConverter:Read (c)|16: return c.Tag|3:end|0:|94:-- there are then two subclasses, depending if you want to open a file for reading or writing.|0:|29:FileIn = class(FileConverter)|0:|28:function FileIn:_init (mask)|25: self:super(true,mask)|3:end|0:|30:FileOut = class(FileConverter)|0:|29:function FileOut:_init (mask)|26: self:super(false,mask)|3:end|0:|20:local converters = {|28: number = NumberConverter(),|22: string = Converter(),|27: boolean = BoolConverter(),|1:}|0:|47:function Converter.AddConverter (typename,conv)|31: converters[typename] = conv|3:end|0:|61:---------------- AutoVarDialog ------------------------------|0:|32:local function callable (method)|32: local mt = getmetatable(method)|56: return type(method) == 'function' or (mt and mt.__call)|3:end|0:|32:local function simple_list (nxt)|44: return type(nxt) == 'table' and #nxt > 0|3:end|0:|33:AutoVarDialog = class(LayoutForm)|0:|34:function AutoVarDialog:_init (tbl)|15: self.rows = {}|26: self.T = tbl.Object or _G|25: self.verify = tbl.Verify|39: self.verify_exists = tbl.Verify ~= nil|55: --end of local fields; NOW we can initialize the form!|17: self.super(self)|35: self.Text = tbl.Text or "untitled"|19: local i,n = 1,#tbl|19: while i <= n do|34: local converter,constraint,extra|20: local lbl = tbl[i]|22: local var = tbl[i+1]|27: local value = self.T[var]|27: local vtype = type(value)|53: -- is there a particular default or constraint set?|17: if i+1 < n then|23: local nxt = tbl[i+2]|32: if type(nxt) ~= 'string' then|25: if callable(nxt) then|21: constraint = nxt|32: elseif simple_list(nxt) then|49: -- have been given a list of possible values|35: converter = ListConverter(nxt)|39: elseif Converter.class_of(nxt) then|20: converter = nxt|8: else|61: ShowError("Unknown converter or verify function: "..nxt)|11: return|7: end|13: i = i + 1|6: end|5: end|23: if not converter then|54: -- use a default converter appropriate to this type|32: converter = converters[vtype]|24: if not converter then|58: ShowError("Cannot find a converter for type: "..vtype)|10: return|6: end|5: end|31: local c = converter:Control()|82: self:AddControlRow(lbl,c,converter.ExtraControl and converter:ExtraControl())|26: converter:Write(c,value)|80: append(self.rows,{cntrl=c,converter=converter,var=var, constraint=constraint})|11: i = i + 2|4: end|3:end|0:|30:function AutoVarDialog:OnOK ()|13: local T = {}|35: for _,t in ipairs(self.rows) do|45: local value,err = t.converter:Read(t.cntrl)|34: if not err and t.constraint then|28: err = t.constraint(value)|5: end|13: if err then|17: ShowError(err)|18: t.cntrl:Focus()|15: return false|5: end|18: T[t.var] = value|4: end|54: -- a function to verify the fields has been supplied|27: if self.verify_exists then|28: local err = self.verify(T)|13: if err then|17: ShowError(err)|15: return false|5: end|4: end|69: -- NOW we can finally copy the changed values into the target table!|23: for k,v in pairs(T) do|18: self.T[k] = v|4: end|15: return true|3:end|0:|24:function Match (pat,err)|23: return function (s)|34: --ferr:write(',',s,',',pat,'\n')|40: if not s:find(pat) then return err end|4: end|3:end|0:|22:function Range (x1,x2)|38: if not x2 then -- unbound upper range|20: return function(x)|56: if x < x1 then return "Must be greater than "..x1 end|5: end|42: elseif not x1 then -- unbound lower range|20: return function(x)|53: if x > x2 then return "Must be less than "..x2 end|5: end|5: else|20: return function(x)|74: if x < x1 or x > x2 then return "Must be in range "..x1.." to "..x2 end|5: end|4: end|3:end|0:|53:NonBlank = Match ('%S+','Must be a non-blank string')|38:Word = Match('^%w+$','Must be a word')|0:|62:--- A useful function for prompting a user for a single value.|71:-- returns a non-nil value if the user clicks on OK or presses <enter>.|49:function PromptForString (caption,prompt,default)|34: local tbl = {val = default or ""}|61: local form = AutoVarDialog {Text = caption, Object = tbl;|14: prompt,"val"|2: }|28: if form:ShowDialogOK() then|16: return tbl.val|4: end|3:end|0:|
Codepage=16
Styles=#17:// Язык подсветки|14:@1 Language=15|0:|73:// Настройка стиля синтаксиса подсветки в соответствии с выбранным языком|98:// 1-синтаксическая инструкция, стили шрифта 2-полужирный, 3-курсив, 4-подчёркнутый, 5-цвет шрифта|83:# LUA_DEFAULT=0, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=0|87:# LUA_COMMENT=1, FontBold=False, FontItalic=True, FontUnderline=False, FontColor=39680|91:# LUA_COMMENTLINE=2, FontBold=False, FontItalic=True, FontUnderline=False, FontColor=39680|90:# LUA_COMMENTDOC=3, FontBold=False, FontItalic=True, FontUnderline=False, FontColor=39680|84:# LUA_NUMBER=4, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=255|86:# LUA_WORD=5, FontBold=True, FontItalic=False, FontUnderline=False, FontColor=8323072|89:# LUA_STRING=6, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=11633048|91:# LUA_CHARACTER=7, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=8323252|93:# LUA_LITERALSTRING=8, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=27871|90:# LUA_PREPROCESSOR=9, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=255|92:# LUA_OPERATOR=10, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=11534336|87:# LUA_IDENTIFIER=11, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=0|88:# LUA_STRINGEOL=12, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=255|88:# LUA_WORD2=13, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=8323072|87:# LUA_WORD3=14, FontBold=False, FontItalic=True, FontUnderline=False, FontColor=8323072|88:# LUA_WORD4=15, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=8355584|84:# LUA_LABEL=20, FontBold=False, FontItalic=False, FontUnderline=False, FontColor=255|0:|
WordsKey1=#106:and break do else elseif end false for function if in local nil not or repeat return then true until while|
WordsKey2=#128:_VERSION assert collectgarbage dofile error gcinfo loadfile loadstring print rawget rawset require tonumber tostring type unpack|
WordsKey3=#60:string.byte string.char string.dump string.find string.len \|88:string.lower string.rep string.sub string.upper string.format string.gfind string.gsub \|102:table.concat table.foreach table.foreachi table.getn table.sort table.insert table.remove table.setn \|88:math.abs math.acos math.asin math.atan math.atan2 math.ceil math.cos math.deg math.exp \|81:math.floor math.frexp math.ldexp math.log math.log10 math.max math.min math.mod \|83:math.pi math.pow math.rad math.random math.randomseed math.sin math.sqrt math.tan \|54:string.gmatch string.match string.reverse table.maxn \|59:math.cosh math.fmod math.modf math.sinh math.tanh math.huge|
WordsKey4=#43:abs acos asin atan atan2 ceil cos deg exp \|75:floor format frexp gsub ldexp log log10 max min mod rad random randomseed \|75:sin sqrt strbyte strchar strfind strlen strlower strrep strsub strupper tan|
BraceBadBold=1
ColorIGFore=9413297
ColorOfFlags=12639424
NumSizeCorrect=-1
MarginNumFore=8421504
Markers=1
MarkMarginWidth=14
MarkerForm=8
Fold=1
FoldMarginWidth=14
FoldMarginColor1=13424089
FoldIcon=1
AutoComplete=1
AutoCompStrings=#106:and break do else elseif end false for function if in local nil not or repeat return then true until while|0:|
MinWordLen=2
ScrollBars=2
Point(LinePosition)
Point(ArrayFold)
Point(Position)
}

Редактировалось 11 раз(а), последний 2017-12-01 16:15:53
карма: 3

0
Ответов: 4413
Рейтинг: 472
#98: 2017-12-01 11:36:16 ЛС | профиль | цитата
Ну как бы избавится от глобальной переменной. Ну это я так, хозяин барин, больше не мешаю
карма: 4

0
Ответов: 1416
Рейтинг: 97
#99: 2017-12-01 15:52:35 ЛС | профиль | цитата
andrestudio, сейчас всё пучком, по этому можно поместить ссылку https://yadi.sk/d/817y_pAe3PxAEm
в первый пост.
Похоже все варианты перетёрли, какие функции включать, какие не включать, какие объединить и компромиссы найдены.
Изменений, думаю, не будет.
карма: 3

0
Ответов: 4413
Рейтинг: 472
#100: 2017-12-01 19:34:30 ЛС | профиль | цитата
flint2, в личку глянь
карма: 4

0
Ответов: 88
Рейтинг: 0
#101: 2018-01-29 10:06:24 ЛС | профиль | цитата
Парни а возможно увеличить отступы между строками (ну то есть разделение на абзацы)? И сделать отступ от верха до начала текста?

Редактировалось 1 раз(а), последний 2018-01-29 10:07:12
карма: 0

0
Ответов: 1416
Рейтинг: 97
#102: 2018-01-29 11:42:36 ЛС | профиль | цитата
theSever, это Notepad++ со всеми вытекающими.
Насколько я помню, абзацы и отступ от верха делаются переводом строки.
карма: 3

0
Ответов: 88
Рейтинг: 0
#103: 2018-01-29 11:51:58 ЛС | профиль | цитата
flint2 писал(а):
theSever, это Notepad++ со всеми вытекающими.
Насколько я помню, абзацы и отступ от верха делаются переводом строки.


Сейчас в мане копаюсь, вроде можно задать поля. Но туплю как их правильно прописать в стиле. Правда расстояния между строками пока не нашел.
карма: 0

0
Ответов: 1416
Рейтинг: 97
#104: 2018-01-29 11:59:31 ЛС | профиль | цитата
Задать поля можно, а расстояния между строками - нельзя.
карма: 3

0
Ответов: 88
Рейтинг: 0
#105: 2018-01-29 12:21:17 ЛС | профиль | цитата
flint2 писал(а):
Задать поля можно, а расстояния между строками - нельзя.

А как правильно поля задать в стилях?

То что с расстоянием между абзацами эт хреново, читабельность текста падает.

И все точки облазил, не могу найти как прокрутить текст до нужной строки.

Редактировалось 1 раз(а), последний 2018-01-29 12:31:52
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)