1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
|
--!A cross-platform build utility based on Lua
--
-- Licensed under the Apache License, Version 2.0 (the "License");
-- you may not use this file except in compliance with the License.
-- You may obtain a copy of the License at
--
-- http://www.apache.org/licenses/LICENSE-2.0
--
-- Unless required by applicable law or agreed to in writing, software
-- distributed under the License is distributed on an "AS IS" BASIS,
-- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-- See the License for the specific language governing permissions and
-- limitations under the License.
--
-- Copyright (C) 2015-present, Xmake Open Source Community.
--
-- @author ruki
-- @file boxdialog.lua
--
-- load modules
local log = require("ui/log")
local rect = require("ui/rect")
local action = require("ui/action")
local curses = require("ui/curses")
local window = require("ui/window")
local textdialog = require("ui/textdialog")
-- define module
local boxdialog = boxdialog or textdialog()
-- init dialog
function boxdialog:init(name, bounds, title)
-- init window
textdialog.init(self, name, bounds, title)
-- resize text
self._TEXT_EY = 3
self:text():bounds().ey = self._TEXT_EY
self:text():invalidate(true)
self:text():option_set("selectable", false)
-- insert box
self:panel():insert(self:box())
-- text changed
self:text():action_set(action.ac_on_text_changed, function (v)
if v:text() then
local lines = #self:text():splitext(v:text())
if lines > 0 and lines < self:height() then
self._TEXT_EY = lines
self:panel():invalidate(true)
end
end
end)
-- select buttons by default
self:panel():select(self:buttons())
-- on resize for panel
self:panel():action_add(action.ac_on_resized, function (v)
self:text():bounds().ey = self._TEXT_EY
self:box():bounds_set(rect{0, self._TEXT_EY, v:width(), v:height() - 1})
end)
-- on click for frame
self:frame():action_set(action.ac_on_clicked, function (v, x, y)
-- get relative coordinates
x, y = x - v:bounds().sx, y - v:bounds().sy
local panel, box = v:parent():panel(), v:parent():box()
local px, py = x - panel:bounds().sx, y - panel:bounds().sy
-- if coordinates don't match any view try box
if panel:option("mouseable") then
if panel:action_on(action.ac_on_clicked, x, y) then
return true
elseif box:option("mouseable") and not box:option("selectable") and box:bounds():contains(px, py) then
return box:action_on(action.ac_on_clicked, px, py)
end
end
end)
end
-- get box
function boxdialog:box()
if not self._BOX then
self._BOX = window:new("boxdialog.box", rect{0, self._TEXT_EY, self:panel():width(), self:panel():height() - 1})
self._BOX:border():cornerattr_set("black", "white")
end
return self._BOX
end
-- on resize
function boxdialog:on_resize()
self:text():text_set(self:text():text())
textdialog.on_resize(self)
end
-- return module
return boxdialog
|