Добавлены правильные иконки на формы

This commit is contained in:
Sergey Kalinin 2018-05-27 15:40:36 +03:00
parent 7d1f8919a4
commit 60e6b4e0ac
4 changed files with 94 additions and 52 deletions

View File

@ -340,6 +340,7 @@ namespace eval Add {} {}
proc Add::server {} { proc Add::server {} {
global default global default
toplevel .add toplevel .add
set frm [ttk::labelframe .add.frm -text "Добавление основного сервера" -labelanchor nw] set frm [ttk::labelframe .add.frm -text "Добавление основного сервера" -labelanchor nw]
label $frm.lbl_host -text "Адрес сервера" label $frm.lbl_host -text "Адрес сервера"
@ -354,7 +355,7 @@ proc Add::server {} {
grid columnconfigure $frm 0 -weight 1 grid columnconfigure $frm 0 -weight 1
grid rowconfigure $frm 0 -weight 1 grid rowconfigure $frm 0 -weight 1
set frm_btn [frame .add.frm_btn -border 0] set frm_btn [frame .add.frm_btn -border 0]
ttk::button $frm_btn.btn_ok -image add_grey_24 -command { ttk::button $frm_btn.btn_ok -image ok_grey_24 -command {
set host [SaveMainServer [.add.frm.ent_host get] [.add.frm.ent_port get]] set host [SaveMainServer [.add.frm.ent_host get] [.add.frm.ent_port get]]
.frm_tree.tree insert {} end -id "server::$host" -text "$host" -values "$host" .frm_tree.tree insert {} end -id "server::$host" -text "$host" -values "$host"
destroy .add destroy .add
@ -372,6 +373,7 @@ proc Add::servers {tree host values} {
#set active_cluster $values #set active_cluster $values
toplevel .add toplevel .add
wm title .add "Добавление рабочего сервера" wm title .add "Добавление рабочего сервера"
#wm iconphoto .add server_grey_64
ttk::label .add.lbl -image server_grey_64 ttk::label .add.lbl -image server_grey_64
set frm [ttk::labelframe .add.frm -text "Добавление рабочего сервера" -labelanchor nw] set frm [ttk::labelframe .add.frm -text "Добавление рабочего сервера" -labelanchor nw]
label $frm.lbl_server_desc -text "Описание сервера" label $frm.lbl_server_desc -text "Описание сервера"
@ -437,7 +439,7 @@ proc Add::servers {tree host values} {
grid columnconfigure $frm 0 -weight 1 grid columnconfigure $frm 0 -weight 1
grid rowconfigure $frm 0 -weight 1 grid rowconfigure $frm 0 -weight 1
set frm_btn [frame .add.frm_btn -border 0] set frm_btn [frame .add.frm_btn -border 0]
ttk::button $frm_btn.btn_ok -image add_grey_24 -command { ttk::button $frm_btn.btn_ok -image ok_grey_24 -command {
RunCommand "" "server insert \ RunCommand "" "server insert \
--agent-host=[.add.frm.ent_host get] \ --agent-host=[.add.frm.ent_host get] \
--agent-port=[.add.frm.ent_port get] \ --agent-port=[.add.frm.ent_port get] \
@ -481,7 +483,7 @@ proc Add::infobases {tree host values} {
toplevel .add toplevel .add
wm title .add "Добавление информационной базы" wm title .add "Добавление информационной базы"
ttk::label .add.lbl -image add_database_grey_64 ttk::label .add.lbl -image database_grey_64
set frm [ttk::labelframe .add.frm -text "Добавление информационной базы" -labelanchor nw] set frm [ttk::labelframe .add.frm -text "Добавление информационной базы" -labelanchor nw]
label $frm.lbl_infobase_name -text "Имя информационной базы" label $frm.lbl_infobase_name -text "Имя информационной базы"
entry $frm.ent_infobase_name entry $frm.ent_infobase_name
@ -553,7 +555,7 @@ proc Add::infobases {tree host values} {
} }
set frm_btn [frame .add.frm_btn -border 0] set frm_btn [frame .add.frm_btn -border 0]
ttk::button $frm_btn.btn_ok -image add_grey_24 -command { ttk::button $frm_btn.btn_ok -image ok_grey_24 -command {
RunCommand "" "infobase create $db_create \ RunCommand "" "infobase create $db_create \
--name=[.add.frm.ent_infobase_name get] \ --name=[.add.frm.ent_infobase_name get] \
--dbms=$dbms \ --dbms=$dbms \
@ -605,7 +607,7 @@ proc Add::cluster {tree host values} {
grid columnconfigure $frm 0 -weight 1 grid columnconfigure $frm 0 -weight 1
grid rowconfigure $frm 0 -weight 1 grid rowconfigure $frm 0 -weight 1
set frm_btn [frame .add.frm_btn -border 0] set frm_btn [frame .add.frm_btn -border 0]
ttk::button $frm_btn.btn_ok -image add_grey_24 -command { ttk::button $frm_btn.btn_ok -image ok_grey_24 -command {
RunCommand "" "cluster insert \ RunCommand "" "cluster insert \
--host=[.add.frm.ent_host get] \ --host=[.add.frm.ent_host get] \
--port=[.add.frm.ent_port get] \ --port=[.add.frm.ent_port get] \
@ -629,3 +631,4 @@ proc SaveMainServer {host port} {

View File

@ -64,3 +64,4 @@ grid rowconfigure $frm_work 0 -weight 1
#pack $tree_work -expand true -fill both #pack $tree_work -expand true -fill both
pack $frm_tool -side left -fill y pack $frm_tool -side left -fill y
pack $frm_tree $frm_work -side left -expand true -fill both pack $frm_tree $frm_work -side left -expand true -fill both

View File

@ -227,50 +227,87 @@ image create photo add_database_grey_64 -data {
Fb9Dy5ziR7lNxxIFiqysVzmVVFKCCzcGJhGCTBHgAv5Ucy1OdvLTDJmUyZ/YPDOmiAJA6tjOeku9 Fb9Dy5ziR7lNxxIFiqysVzmVVFKCCzcGJhGCTBHgAv5Ucy1OdvLTDJmUyZ/YPDOmiAJA6tjOeku9
P8QOHUgr0RQGUk4HbTTEtD/Eafo5oLOq8v8Hsjgpyl4aWQUAAAAASUVORK5CYII= P8QOHUgr0RQGUk4HbTTEtD/Eafo5oLOq8v8Hsjgpyl4aWQUAAAAASUVORK5CYII=
} }
image create photo cluster_grey_64 -data {
iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAYAAACqaXHeAAAABmJLR0QA/wD/AP+gvaeTAAAACXBI
WXMAAAsTAAALEwEAmpwYAAAAB3RJTUUH4gUWAxQTgpy/yAAABXtJREFUeNrtm02MFEUUx381HyRs
FORTxQABFRNPGA5wIGHYqTp58ODNGILrgQsX8QCbQGKCyEdCROJNBJcQLph49xWb2eAePGzkoFEx
RMUEFZaPcBjR3qE9bPWmM6nq2R22w85HJZveraqt7v+rqv9771/dAGhdKWpdUcnvvVKndWXmj7Jr
GHDXco/UlUlZp9fAD2hdgV4F766F9L4o9+BWKNLD4MukGLFPgn0S7JNgi73SgWU2JKhm9gJgbS3S
ujJgba2e1ClVXgmcB3SH4R8F3o7jaDKEzdpapNwKKGSAv0lHl3i9iL3hA691pVwAHoWs42a+w4s6
Mzi4teQBPwBEBWtrcQA8HbjsfcWMjn475dvmQKGkdaXos47r4CvfAJeBGCgDkbtOzUOdBrZ77nkO
uACsAU4Dy1Jt94C9wC3gLeCdkCU8K/1RydpaYw7gAS6LyAeBPfVYdUqV8RjgnIgMaV0pW1uLjNEC
6q9U+4Y4jiL3zNYYUwR2zQI81tYahcQN+jqEWCUP8A6A8tzvQgJe68qAiP0bmHBtE/X61QfJeG7M
z0IucU4kmFHKeYB3dSXP/dZ4VubGZPbHx2/HTdz1cmD5t0WCvhLlBB7HCc3ltDH62QS8MeZYigOW
G2OOWFuLprdH9XngZGAFeElQORL08oAxJvaMNeaIMEoRmXKz97h1O4EdAcNPuJlf5mm7A9wAXvP9
o4io9DZKk6DKsA7GmFvAqg53g5MisirEA6UwCcYx8BHwcYcb4EhbJGjt2FQU/fQJ8HkHgz8rIqdC
/ANEKsM66a3wKvA68Azw3zwFPg+Bo+5BDzkemK/gKgK+EpEfW5Dvk9MEnWHjNNH2nCaYNsCTEkcy
02Fra9Hg4NZSsbhkI/AGsHQe3d+/TVugOI/udAr4UkR+Dri/GRJUWldUKBjavn2dWrz4lTPAUIeS
4IiI7M4gwXoGCe5YrNSiPV3gBveLyIkQCRbC6fDYP8BwF+gB72dkhKrQIh1evYCATLiQl0AoPBFo
W52VDgcjwYyE6ICIHM9FujHmQIoYk3IfGi+KjN51fQ4DB1PZ+TEROzzdpleA+sWXL8xnOvx0Xq4J
eMpzv70io3eTfiJyCLibzLyIHU7GE7F3gH3dlg7/7un3q7v+1ry/getzSYeDJJgliOQB3hndt/r2
pPsZY5YCW1zbFmP0iiZQQ3PQBFWrdNinBwyLyLGcOGA/4Bt7xEn0zwGfekTRfW7mh4DdPj0gxAPB
SHBaYfEaoOOKE0TaIsHRLsD/dbW6rdRWOqxUeWkXHI29JGKvtxEJ1urTB4vxekDyejr3k8vMtwBf
npHhW/nqwcGtpZxIL86LZ6rVbaVZ6RJP6hWZgCCyMF+Rye3UMscVkHbvWa/ItNQEjamuhcKI0+zz
4AACR2KPWy4Du+I4up+lCbY4GKmuhcKNDneDL8RxdDtAgq1OhwsjXRAHnLe2pgMrveXp8M4uMEA1
Kx0uuUiwMYd0+JCIfJgTKR4EDnuazgEXnbjhywXec5nhbl8ukJEO19tJh4s5uqaiD/zDh9+/KyI2
jqNLEG9q4tFNcRxdFJGxev2HIeCLbkuHL1658ufMOwAidhK46tq+E7GTyXjj4zfjkAHa1QR9ZSoP
8Ely4tP0PCtzXfraNN6GWYLH2lqjnXQ4Tz3Apwneg3iTm3mPJshxETngNMGVoK41a4JZ6XDmwcgC
0wOuuhlfHlCF/wA2h/QAHw/MhgRvLSADbA6AB1gRAp9gaJcET3RBHHBU6x2lOZPgtMwsJ4GzHQz+
rIicAqXmfDCSjNBoPNhTLC45AbwJLCKfN0Tnsy6R1y+JyLVWp8P9L0Z6Fby79j+bo4fB9z+b65Og
rqAcEyaupACoVGzQ7XXqfwxx1R+Bwei+AAAAAElFTkSuQmCC
}
image create photo server_grey_64 -data { image create photo server_grey_64 -data {
iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAYAAACqaXHeAAAABmJLR0QA/wD/AP+gvaeTAAAACXBI iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAQAAAAAYLlVAAAAAmJLR0QA/4ePzL8AAAAJcEhZcwAA
WXMAARCQAAEQkAGJrNK4AAAAB3RJTUUH4gUWBgMHmw4tyAAAAvpJREFUeNrtmz1oFEEUx393HKSI CxMAAAsTAQCanBgAAAAHdElNRQfiBRsLECys796UAAAC/klEQVRo3u2Zz0sUURzAPw7DJEsIiUSY
pstpITEEMYII4isCogTU0iJNsAnYJAGrYOsHCIqNla0pbKysTJMoYqEg6MkLKSxMFIwGm3hB8oEi UJSUhIeyINCoQ9ClkKCuhVsYvUv9AREdo0MIQXwhKA/9ugSGhxARMQuJTtLBg6hFCEnJ4mFZbBuG
Bs4ic3Asq9xuZuZ2s/Ovjt3l9s1v3sy892anREqJCKqKiIwDY8BJoAco4UcNYA2oAQ9UdaZpUxKV Dq66u7M6894+dyj8XnbezJv5ft7313tvXx0Rog6R5ig78XBxcHEBBweKflclIAB8wMfHJ88y07yU
dgGg37y8l2zoPXAa2FLVhjMAIgLQD3wme9oEDgC/2vWEctI3mD+ukU3tB54nGQZpPGAcmP7H7T9m jwAKACn7ft2myj3ucwuXamWQtGRU0Q2JA6BcBriAHZnijCyq0G0pM2Gp3LOmHo7QHzY/qI0toFqY
bPpQ5T8dOATU2gFRSfHisZhrC8Cwqm747G4ROWy8sRq5NaGqNSdDwMz2UQ0DGy1zhOuGN39+AUbi xSvzcPiqWJyIe2dlNGyDjf3bs6Y+i2KMPH5RkFWW8Nfaec6BwnUvo4KKDXB83RXywtj0EyrN+8J1
HkniRknVE3X7SM8PisgU0O2g7SWgDtwVkbpZhudjnut1CaAUsx43e2UQ+ODB+68awD93O7eVbVlk WzzmsIwDqBTX2BvRc8VCAX/wyfBWfgJTa0/rTQFyoDw+0KE5+ruqS76zvNb24gZOufhAt7Z6aOFq
Jpwpj1PAZRt/UrZsVLdHAPuyCCB3CgACgADAqj55tH0piwDuAIseGj+nqjO2EgqrRQpVPSYiR01m ScS4pgAB0GgUAbuiuzgxIjowDkFn05zRcoE5ANW7YEtlawF8ewDfjAB+2AMYQb8aTvAkulPMuV4C
ZjsxKgGrqrqSpvjhHEDTIFVdcu0CNhpvHUBLmeysrUAlRnVVfZc5DzC5QJeIrOC4TCYi86pqJe20 rqjHNMcw+MpyJE+WSfGjNWgsNuTTVoSJBoBqogEPN+KtgIAAnywLEkTrcuNCKuGGZs6Mq/OSNQ/C
nQvcxE+N8JSIXMriKtDncRnsyyKABjlTiAQDAPuBSqEBrHu0fT1TAEwccM9T438DD7MSCZZb4oCv kifqFDe1U/Y0PdVkQemTViMHH7aXhp4RQCpaQxwA82oZJA1gqRQ7mM6IlgBcIGME8MsOgAeMMKOt
InIQuIK78tgacB/YtjHs0uwMxS11VeC7rfg8odedA15Ebn1T1UM+h8Ab4EgH5rAh4EkWcoEB4KOP PssrO6W4ASSrTnKZJnbgRkD7QMBvsgzJTDzzRkkrYyCZOHNbBWk2BVgf5wO1yGeWyIt2KKoTvK4e
XaEQBwQAAUAAEAAEAAFAALCXALwykWRHVOlgw6dVdbIlrq8AT4HzRfCAZ6o6GQmdt1X1ArBcBADX oJGB1a2kdja4NlxQTf+E14TbANsA/zZAjdDcKgHyTJGjnYZkXDDEQTkmXezjWRIA01ySeQBZopd3
oxsbZkMF4FYRACzGpc7m2mIRAAzEZY7m2kARANyIekDLkLhWBACjInI76v4i8hg47tMQWyWxtNoC tQfol1zR1u1h7QEWSlpzZgu0agB2l7T2194CaZUqat2uPUAbA2oPgEqpPi7argNxlh7nmFWT5Gmn
5oAu4KLFDmm7JNbJOAB2ttBHQygcAAQAAUAAkCMAefgIouESwEYOAPxwCWAhBwDeugTwKAcAptvd qQbb8w02X53/7VwQWNflJw2gaQE/aYB80i5IHGDJOkBOD+CrdYBpPYA31p3QDyo+gMzxyKr6YRnS
pku1tSwiq2TnyGxUr1X1jMtcAPbQ0dnCH57eTRywrKpVYAJ4yc43Oz6XyAY7ZwhngRFVPQFsJmk8 rYR3GLamfo50pfFLxOF1PX3a/49WHD3XZV4568Ut1uF1AaIDRSdO2cTlxko7nxxfeFo4vu9mMHx+
wF/FAPBlD9lngQAAAABJRU5ErkJggg== /Bcn/sUUHzrMRQAAAABJRU5ErkJggg==
} }
image create photo cluster_grey_64 -data {
iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAQAAAAAYLlVAAAAAmJLR0QA/4ePzL8AAAAJcEhZcwAA
CxMAAAsTAQCanBgAAAAHdElNRQfiBRsLGCfz5I0UAAADN0lEQVRo3u2YT0gUURzHv783k+IhQspO
QSB0CA9liqe6VQR16WKnKESJ1ZUCLQg7dAmiIMR/a3rr1M1TXYKCDkpEHUKDPHjIQ6mklbjmOvN+
HXz7Z2Z3/ux70B6aN7Czw87nN9/3+/fmLZCM/31Q/suQvdGKQW5HA+qwDwQLpD4BBsOFCxc55PCd
RjAzsVlqpgr6G42W0krAoJ3t58ewYgt/xVcnV/IXJrTYO2Vb+JEywJBgSKU5f7A6JCQA4BxNF+2Z
0LY6D8AG6AU/QRZ/QOCAUFmwcB63sR9n0i1jC+a0EsAtAICnmddD1sZ19hkgZiaXXOmIpfF3/YvO
ZbTC4sNYMKdtz72/gHWnPGSsMgmQ6E2NTvbmGBBs+27TooXHSVvpsxHp43I7oOYofC7WokUhOgCY
WEbWrVSTAhVK2IQW3mhFlxKTv4OY0R4BEFiLbFy7gb9p0Z5EInv8fWoKl7Dtm18+ryU2rIlKs9en
/ZmMzA3gvt3EX0RR7EGW3MzdKsIDdVmqHAQd2iOABdDXxcdW7FXikuD8APABKQmJTTzbWqa9fBK+
+GrRticXnN6jPM0CZa2sZNRP3ktxWfS1aVF6ZpeaWYSmkcSRjChzvgEtfC2bIlcybgte2TVov2I3
0kRYs9GgvQIa5OewAAIgWuyQATPVor1lWJ9Z6zvNJyEgmMqaKMPFT34Z6AUt2lsFPbfmhmcxG+7F
VA9OVPSjFu0RwJ07nSmdN0sDWtT6rTgRUHMBdtDrhVpIs5BoKF8zg7Y31dMixBMSb+gKXcAwpIYf
Y9Jh6tatm2PzAGZTTbhWtW9j0mE58LtuSd30vJKDRbhfYtJhAhpzx5U30wExhjkdFoJGdyrd7a7Q
Hb6okd4xaTt0IT3lfoyaqCktYrkzKgAGdF6AU72PSzahBnRewI5GlItVYEArAZSt3gAXIm9CKwE8
X7UJR6wW3GlA5zfJ05Ht1pdCNDdeeKwJrQQc+ER3Kb4Joreyq3hpQlPxn67tDvkAbSDYACRsiJI2
5RRSZxfL4qE7U+/woZGv5nSo8OImKkPVp3k8OnkjSgQkAqi8aP7V2CtOqtXj8xKSHKh5DiQjGclI
xl8XzOPtDNgc3wAAAABJRU5ErkJggg==
}
image create photo database_grey_64 -data {
iVBORw0KGgoAAAANSUhEUgAAAEAAAABACAQAAAAAYLlVAAAAAmJLR0QA/4ePzL8AAAAJcEhZcwAA
CxMAAAsTAQCanBgAAAAHdElNRQfiBRsLNghTMrlhAAAFu0lEQVRo3sWZf2hTVxTHP40llFC6UIrL
utCpm11NS3GzLWXT2s1J3Wqrc7+UbQ5/bhfHxPmjkzFEGTgnQ5iDO6doJ3ZVZE6ky6oUVwQVuqBO
RwlOayklFC1ZiF1WsvDcH03z470kfbHJ2/nvvZeX8733nXs+59ybg24TZkpxMIPpFGPDghkToBAi
SJAAIwwzwG3c9Eq/3n/N0eHYTj3zqMGBWbfaPlxc5ALXpTIJAcLBWzRTiYmHNQ9O2rkgQ2kKEGaW
I6glM9bPQb6VXp0ChJnVfIqdzNoI37BH+iYUIGo5QCXZsbtskj+kFCA+ZncaofYwdox1cjSJALGX
LWTfummSI+MXMfEtPjLEPdTzffRiSsT9DH4iF2NsVvWfrhvqGdhEHsZZi/YTLMJIqxQ2tYBijLU8
tYC7BgsYVQvoMtS9Ww6pBewjZKCAvZpl6LpXncMLBrnvYovrgToPODjFE8w2wP01mqD6EVcg/hNs
lApr+AIl66NfIL0sJ18dAytFjVTkdhoZyJrzAC00SK8oZKc2EZk5IWwgOylnB76MOw9xnHL5pVSE
mbZotRGhoXgA9PKyHAAQVtYimJEh536OsV+6AUQ+bTQD02W/VgAMsUp2hu+YmMsKFk+qNhrhHD9y
Zhy/wkFbONCTCACFY2yXnsh9E7OpYz7PYk+jOPVyjUv8yqVo8SHy2cq2CPI0Av6NgXGA79gnVcEo
bFTgYCYl2LCSjxkTJkwoKIQYwcfdcF/wBwPxdbAoYD2bscXc0gj4G4sqaJwcoTO2fEpQwJoAUtX+
wsRzvMtyClQPNAJuJww5H138TPfYj9MzUUgdDUlj6PGxzxwVcID1Kf5tkB6uch03/TKYcrw2yqhg
DlWUpYiZm/Jp9TIs43dd9XAIDx68BBhFQQFMmMjDQgFTsas+ZDJbJVs1VbHYxh6DYOSkaTxuojCq
5DSPMccA9z28So4WRhukguDzrMOog4XSlwhG74haqcjPaMgijEbYyBLpTwwjEyeEHWQX5ezKCoyO
Ui6/loow054IRv+Qxy0a5c0IjNZRmiHnwxxFylvhnNjOK8kzoZc18nRMDnuDZZOCkZ8OTkbzqaig
Ldx7awTcHw8LjrNVDsbtk7zEPKqYltaYXVymC1c0bQkLLalg9BfWGBgdYp86/YoiyihjJnbsFGGl
ILxNBSH8+PDiYYA7uHFrQGZlNZvjmh+NgHsUxb2jcI4jOKONdMLUm4uJUEoY5TKX93g9Mr9pwijA
Oc7SRZ9MOz+IqdSzkMVxENbAKFoDXEgowMJSlgIecYXf6MVNf6o5EXnYKcXBM1TxVAoY9TGkXoYO
ruqEkY9BhvHhJ0gQyMVMPlYKsVOkc4NnnTykhdEn7DYIRp00amFUwWkepcoA9y6WMKW6IFFntIEd
WYeRkwWJYbRS1EpF7mIhfVmFUZP0i0J2aGGUS7soBnmecloYzgKMDjMrDKOknZGbRtkXruHX8j5l
GYTR/rHEIyy0sTR5YzLMGnkmAqNaVtBMySRce+mMg5GD9mQwehB56TjboxwQJhy8yPPUUJJGZzTE
FS7SHQejArayRV9nNEorX43xOw5GDsqYyTSKKcRCXiTphBglgJ8h+rlNL7144lO3KGQ9G9PrjBS6
OELHBDCauDPKpZ63eVNTruuG0Xl+oRv3Q8DITh0NLGKqvs5I8kHKOO7hCjfopU8GUo63BAcO5lCT
soBxy1nqZVjKDV0gURjCg48RRglGckgeFqzYsOvc8P6fO6MOlmhgBK6L1UXUGOD+EsuiTf+U2CfV
ZwkyfxKHdHrsFK/J+9FL7aFVHQcz1g9odxtaOBS/nnISllUf0qIqUSdvQQ6zc3yLOqWAMIxWIzII
o1b2y4Q9Z07KLFfDCprTaki0k+7kJM7kuyp6Dq/HYFSbFoyG6eEy5+mRExwC5OgfjLDioJQnsVNM
EVaVHD9ehhjkDjfpje4zTmT/ATAIDSxy76orAAAAAElFTkSuQmCC
}
image create photo ok_grey_24 -data {
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAQAAABKfvVzAAAAAmJLR0QA/4ePzL8AAAAJcEhZcwAA
CxMAAAsTAQCanBgAAAAHdElNRQfiBRsMHyO+h8lPAAACkklEQVQ4y22UW0hUURSGv7Wny1QmmjaK
DxIZkSJklvUQhJla9hBUlEUX6fIwR0KzHiwiKoKMHvKhmHOGoJLSgiDoJpIGEURi1oOQGJhMCF1k
jKnEQIdZPWh5Droe1/7/f/+b9e8leMrKppzN5BPAEKWXdtrsfjdCXOBMPSu7SfdKENPHcs6OTCNY
5YRZAsR5pV18FcNiLZRi/MA3rXPuewjWfr2BnxEcabS/TMkH06Vaa1kkY5y2r/4nWCU8YT797KPb
Trj9PJCv0psrdykgTpXdAgJWpr5mqfRT4X3e5B3L+S4LeKKFMqTrnX4DnJaljHBgJri1Ulrllixk
H1ENyEUwVhZ7gJt0TYfXzNEmzdHtibLij9IosNVaYSglQIJGr/eJip+TfEF65GmlEmKUZN1m2AR0
OpHp8Or1egQfY9JgR8CO0aZQZsiDmezUztOLZADNockJ8EaQPEMAGJ7o1M+umfuPMH6cjUBEjv3r
aAxINi7N1F/Pxn9YqwCqC/QSEKcyNOoNxSyimk0aXJbP2ygD2q2d2qPNAFzJeOtymQL8MvQCa+GU
ygs6gDS9zUNygS5z7bwGpzysA3rFOkiTJshxIlCdoh2snjz+ozucNtcIUxgkiXpDB0NipM4yEIr5
N/B+0vFNNxw0SBIj+tTYX7QF9DBrARpHfSU8B30XOuaJyAo5CbTSZ0AaGJAk7gSXAVz/6aviqNnl
gWfqPdI1yhknMRHvcn0k/ql4W2KrW12bpZA4h+y74APo/lQ0qBUE2Etq0Yfu391T4PQ1JyQsOcSp
t8PeL7qFMNlAnJd06rCgyVJEKX5gSOuclmlLIJglZ9nNInU1FWLyWC84AzNsDQBrCeWUkU+mIlHt
k3ZtdTwf6y/SqfVpjKc5gQAAAABJRU5ErkJggg==
}

View File

@ -76,3 +76,4 @@ if [file exists [file join $dir(work) 1c_srv.cfg]] {
# option add *ScrollableFrame.Background $editor(bg) interactive # option add *ScrollableFrame.Background $editor(bg) interactive
# option add *ScrolledWindow.Background $editor(bg) interactive # option add *ScrolledWindow.Background $editor(bg) interactive