QPQ-AG/GajuDesk
9
0
Fork 0
Code Issues 3 Pull Requests Actions Packages Projects Releases Wiki Activity

WIP

Browse Source
This commit is contained in:
Craig Everett 2025-03-04 07:03:47 +09:00
parent 6e05f3df41
commit 80691524df
1 changed files with 15 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/gmc_gui.erl
View File

@ -24,6 +24,10 @@
id = 0 :: integer(), id = 0 :: integer(),
wx = none :: none | wx:wx_object()}). wx = none :: none | wx:wx_object()}).
-record(h,
{win = none :: none | wx:wx_object(),
sz = none :: none | wx:wx_object()}).
-record(s, -record(s,
{wx = none :: none | wx:wx_object(), {wx = none :: none | wx:wx_object(),
frame = none :: none | wx:wx_object(), frame = none :: none | wx:wx_object(),
@ -35,7 +39,8 @@
picker = none :: none | wx:wx_object(), picker = none :: none | wx:wx_object(),
id = {#w{}, #w{}} :: labeled(), id = {#w{}, #w{}} :: labeled(),
balance = {#w{}, #w{}} :: labeled(), balance = {#w{}, #w{}} :: labeled(),
buttons = [] :: [widget()]}). buttons = [] :: [widget()],
history = #h{} :: #h{}}).
-type state() :: term(). -type state() :: term().
@ -144,7 +149,6 @@ init(Prefs) ->
AccountSz = wxBoxSizer:new(?wxHORIZONTAL), AccountSz = wxBoxSizer:new(?wxHORIZONTAL),
DetailsSz = wxBoxSizer:new(?wxHORIZONTAL), DetailsSz = wxBoxSizer:new(?wxHORIZONTAL),
ActionsSz = wxBoxSizer:new(?wxHORIZONTAL), ActionsSz = wxBoxSizer:new(?wxHORIZONTAL),
HistorySz = wxBoxSizer:new(?wxVERTICAL),
_ = wxSizer:add(ChainSz, WallB, zxw:flags(wide)), _ = wxSizer:add(ChainSz, WallB, zxw:flags(wide)),
_ = wxSizer:add(ChainSz, ChainB, zxw:flags(wide)), _ = wxSizer:add(ChainSz, ChainB, zxw:flags(wide)),
@ -176,14 +180,19 @@ init(Prefs) ->
_ = wxSizer:add(ActionsSz, GridsBn, zxw:flags(wide)), _ = wxSizer:add(ActionsSz, GridsBn, zxw:flags(wide)),
#w{wx = Refresh} = lists:keyfind(refresh, #w.name, Buttons), #w{wx = Refresh} = lists:keyfind(refresh, #w.name, Buttons),
_ = wxSizer:add(HistorySz, Refresh, zxw:flags(base)),
HistoryWin = wxScrolledWindow:new(Frame),
HistorySz = wxBoxSizer:new(?wxVERTICAL),
ok = wxScrolledWindow:setSizerAndFit(HistoryWin, HistorySz),
ok = wxScrolledWindow:setScrollRate(HistoryWin, 5, 5),
_ = wxSizer:add(MainSz, ChainSz, zxw:flags(base)), _ = wxSizer:add(MainSz, ChainSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, AccountSz, zxw:flags(base)), _ = wxSizer:add(MainSz, AccountSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, Picker, zxw:flags(wide)), _ = wxSizer:add(MainSz, Picker, zxw:flags(wide)),
_ = wxSizer:add(MainSz, DetailsSz, zxw:flags(base)), _ = wxSizer:add(MainSz, DetailsSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, ActionsSz, zxw:flags(base)), _ = wxSizer:add(MainSz, ActionsSz, zxw:flags(base)),
_ = wxSizer:add(MainSz, HistorySz, [{proportion, 3}, {flag, ?wxEXPAND}]), _ = wxSizer:add(MainSz, Refresh, zxw:flags(base)),
_ = wxSizer:add(MainSz, HistoryWin, zxw:flags(wide)),
ok = wxFrame:setSizer(Frame, MainSz), ok = wxFrame:setSizer(Frame, MainSz),
ok = wxSizer:layout(MainSz), ok = wxSizer:layout(MainSz),
@ -198,7 +207,8 @@ init(Prefs) ->
picker = Picker, picker = Picker,
id = ID_W, id = ID_W,
balance = Balance, balance = Balance,
buttons = Buttons}, buttons = Buttons,
history = #h{win = HistoryWin, sz = HistorySz}},
{Frame, State}. {Frame, State}.