Subversion Repositories Kolibri OS

Rev

Rev 9891 | Rev 9902 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9891 Rev 9892
Line 26... Line 26...
26 
    CB := Clipboard, Languages,
 26 
    CB := Clipboard, Languages,
27 
    ChangeLog, Scroll, CheckBox,
 27 
    ChangeLog, Scroll, CheckBox,
28 
    RW, Ini, EB := EditBox, Tabs, Toolbar, SB := StatusBar;
 28 
    RW, Ini, EB := EditBox, Tabs, Toolbar, SB := StatusBar;
Line 29... Line 29...
29 
 
 29 
 
30 
CONST
 30 
CONST
Line 31... Line 31...
31 
    HEADER = "CEdit (13-jan-2023)";
 31 
    HEADER = "CEdit (21-jan-2023)";
32 
 
 32 
 
Line 33... Line 33...
33 
    ShellFilter = "";
 33 
    ShellFilter = "";
Line 63... Line 63...
63 
    btnHeight = 25;
 63 
    btnHeight = 25;
64 
    btnWidth = 75;
 64 
    btnWidth = 75;
Line 65... Line 65...
65 
 
 65 
 
Line 66... Line 66...
66 
    toolbarTop = Menu.MainMenuHeight + 3;
 66 
    toolbarTop = Menu.MainMenuHeight + 3;
Line 67... Line 67...
67 
 
 67 
 
Line 68... Line 68...
68 
    TOP = toolbarTop + Toolbar.BtnSize + 10 + Tabs.tabHeight;
 68 
    TOP = toolbarTop + Toolbar.BtnSize + 9 + Tabs.tabHeight;
69 
 
 69 
 
Line 167... Line 167...
167 
    maxTexts = 32;
 167 
    maxTexts = 32;
Line 168... Line 168...
168 
 
 168 
 
169 
	SHIFT = Menu.SHIFT;
 169 
	SHIFT = Menu.SHIFT;
Line -... Line 170...
- 
 
 170 
	CTRL  = Menu.CTRL;
- 
 
 171 
 
Line 170... Line 172...
170 
	CTRL  = Menu.CTRL;
 172 
	ClippingArea = 50;
171 
 
 173 
 
172 
 
 174 
 
173 
VAR
 175 
VAR
Line 444... Line 446...
444 
    ELSE
 446 
    ELSE
445 
    	SB.SetFont(G.fonts[1])
 447 
    	SB.SetFont(G.fonts[1])
446 
    END;
 448 
    END;
447 
    BOTTOM := SB.height() + scrollWidth - 1;
 449 
    BOTTOM := SB.height() + scrollWidth - 1;
448 
    G.destroy(canvas);
 450 
    G.destroy(canvas);
449 
    canvas := G.CreateCanvas(cliWidth - (LEFT + RIGHT + 2 + RIGHT_PADDING), cliHeight - (TOP + BOTTOM + 1));
 451 
    canvas := G.CreateCanvas(cliWidth - (LEFT + RIGHT + 2 + RIGHT_PADDING), cliHeight - (TOP + BOTTOM + 1 - ClippingArea));
- 
 
 452 
    DEC(canvas.height, ClippingArea);
450 
    Tabs.setArea(tabs, LEFT, TOP - Tabs.tabHeight, cliWidth - (LEFT + RIGHT + 2 + RIGHT_PADDING), Tabs.tabHeight);
 453 
    Tabs.setArea(tabs, LEFT, TOP - Tabs.tabHeight, cliWidth - (LEFT + RIGHT + 2 + RIGHT_PADDING), Tabs.tabHeight);
451 
    G.SetFont(canvas, font);
 454 
    G.SetFont(canvas, font);
452 
    T.setCanvas(canvas);
 455 
    T.setCanvas(canvas);
453 
    T.resize(canvas.width, canvas.height);
 456 
    T.resize(canvas.width, canvas.height);
454 
    Scroll.resize(vScroll, vScroll.width, canvas.height + 2);
 457 
    Scroll.resize(vScroll, vScroll.width, canvas.height + 2);
Line 2097... Line 2100...
2097 
 
 2100 
 
2098 
    LEFT := LEFT_PADDING;
 2101 
    LEFT := LEFT_PADDING;
2099 
    RIGHT := scrollWidth - 2;
 2102 
    RIGHT := scrollWidth - 2;
2100 
    BOTTOM := SB.height() + scrollWidth - 1;
 2103 
    BOTTOM := SB.height() + scrollWidth - 1;
2101 
    SkinHeight := K.SkinHeight();
 2104 
    SkinHeight := K.SkinHeight();
- 
 
 2105 
    canvas := G.CreateCanvas(winWidth - (LEFT + RIGHT + 11 + RIGHT_PADDING), winHeight - (TOP + BOTTOM + 5 - ClippingArea) - SkinHeight);
2102 
    canvas := G.CreateCanvas(winWidth - (LEFT + RIGHT + 11 + RIGHT_PADDING), winHeight - (TOP + BOTTOM + 5) - SkinHeight);
 2106 
    DEC(canvas.height, ClippingArea);
2103 
    tabs := Tabs.create();
 2107 
    tabs := Tabs.create();
2104 
    Tabs.setArea(tabs, LEFT, TOP - Tabs.tabHeight, canvas.width, Tabs.tabHeight);
 2108 
    Tabs.setArea(tabs, LEFT, TOP - Tabs.tabHeight, canvas.width, Tabs.tabHeight);
2105 
    font := G.fonts[Ini.font];
 2109 
    font := G.fonts[Ini.font];
2106 
    G.SetFont(canvas, font);
 2110 
    G.SetFont(canvas, font);