| 28,7 → 28,7 |
|---|
| RW, Ini, EB := EditBox, Tabs, Toolbar, SB := StatusBar; |
| |
| CONST |
| HEADER = "CEdit (17-may-2022)"; |
| HEADER = "CEdit (09-jun-2022)"; |
| |
| ShellFilter = ""; |
| EditFilter = "SH|INC|TXT|ASM|OB07|C|CPP|H|PAS|PP|LUA|INI|JSON"; |
| 186,7 → 186,7 |
|---|
| OD: OpenDlg.Dialog; |
| confirm, notFound, menuFindClicked, search, searchOpened: BOOLEAN; |
| |
| switch, closing: BOOLEAN; |
| switch, closing, newtab: BOOLEAN; |
| leftButton: BOOLEAN; |
| LEFT, RIGHT, BOTTOM: INTEGER; |
| |
| 765,7 → 765,9 |
|---|
| Tabs.switch(tabs, n); |
| Switch(texts[n]); |
| resetTimer; |
| IF ~newtab THEN |
| draw_window |
| END |
| END SwitchTab; |
| |
| |
| 777,6 → 779,7 |
|---|
| nov := T.New(); |
| T.SetPos(nov, 0, 0); |
| insert(textsCount, nov); |
| newtab := TRUE; |
| SwitchTab(curText) |
| ELSE |
| error("too many files") |
| 2082,6 → 2085,7 |
|---|
| debugScript := Ini.debugScript; |
| leftButton := FALSE; |
| resized := FALSE; |
| newtab := FALSE; |
| K.ScreenSize(winWidth, winHeight); |
| scrollWidth := winHeight DIV 35; |
| winWidth := (winWidth*80) DIV 100 - (128 + 30); |
| 2240,6 → 2244,10 |
|---|
| scr := K.Scroll() |
| END |
| |7: receiveIPC |
| END; |
| IF newtab THEN |
| Redraw(resized, width, height, cliWidth, cliHeight); |
| newtab := FALSE |
| END |
| END |
| END main; |