MetzNet
/
dfhack
3
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

click to correct cursor position on long strings 

where the left side of the string has been trimmed
develop
myk002 2022-07-17 15:43:58 -07:00 committed by Myk
parent b7f74fe2ce
commit 8de8b22566
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
library/lua/gui/widgets.lua
Unescape Escape View File

@ -197,6 +197,7 @@ function EditField:init()
self:setFocus(true) self:setFocus(true)
end end
self.start_pos = 1
self.cursor = 1 self.cursor = 1
self:addviews{HotkeyLabel{frame={t=0,l=0}, self:addviews{HotkeyLabel{frame={t=0,l=0},
@ -238,6 +239,7 @@ function EditField:onRenderBody(dc)
local txt = self.text:sub(1, self.cursor - 1) .. cursor_char .. local txt = self.text:sub(1, self.cursor - 1) .. cursor_char ..
self.text:sub(self.cursor + 1) self.text:sub(self.cursor + 1)
local max_width = dc.width - self.text_offset local max_width = dc.width - self.text_offset
self.start_pos = 1
if #txt > max_width then if #txt > max_width then
-- get the substring in the vicinity of the cursor -- get the substring in the vicinity of the cursor
max_width = max_width - 2 max_width = max_width - 2
@ -245,11 +247,12 @@ function EditField:onRenderBody(dc)
local start_pos = math.max(1, self.cursor-half_width) local start_pos = math.max(1, self.cursor-half_width)
local end_pos = math.min(#txt, self.cursor+half_width-1) local end_pos = math.min(#txt, self.cursor+half_width-1)
if self.cursor + half_width > #txt then if self.cursor + half_width > #txt then
start_pos = #txt - max_width start_pos = #txt - (max_width - 1)
end end
if self.cursor - half_width <= 1 then if self.cursor - half_width <= 1 then
end_pos = max_width + 1 end_pos = max_width + 1
end end
self.start_pos = start_pos > 1 and start_pos - 1 or start_pos
txt = ('%s%s%s'):format(start_pos == 1 and '' or string.char(27), txt = ('%s%s%s'):format(start_pos == 1 and '' or string.char(27),
txt:sub(start_pos, end_pos), txt:sub(start_pos, end_pos),
end_pos == #txt and '' or string.char(26)) end_pos == #txt and '' or string.char(26))
@ -294,7 +297,7 @@ function EditField:onInput(keys)
elseif keys._MOUSE_L then elseif keys._MOUSE_L then
local mouse_x, mouse_y = self:getMousePos() local mouse_x, mouse_y = self:getMousePos()
if mouse_x then if mouse_x then
self:setCursor(mouse_x) self:setCursor(self.start_pos + mouse_x)
return true return true
end end
elseif keys.CURSOR_LEFT then elseif keys.CURSOR_LEFT then