cedit: Fix shortcut description

cedit: remove extra lines
cedit: add english shortcuts
2026-03-08 10:41:00 +05:00 · 2026-02-22 08:10:32 +00:00 · 2026-02-22 08:10:32 +00:00 · 2026-02-22 08:10:32 +00:00
3 changed files with 116 additions and 59 deletions
--- a/programs/develop/cedit/SHORTCUTS_EN.TXT
+++ b/programs/develop/cedit/SHORTCUTS_EN.TXT
@@ -0,0 +1,55 @@
+Keyboard Shortcuts:
+
+  ctrl+A      Select all
+  ctrl+C      Copy
+  ctrl+V      Paste
+  ctrl+X      Cut
+  ctrl+L      Convert to lowercase
+  ctrl+U      Convert to uppercase
+  ctrl+F,
+  ctrl+H      Show search/replace panel
+  Esc         Close search panel; Close menu
+  shift+Esc   Hide (Minimize) search panel
+  F10         Open main menu
+  shift+F10   Open context menu
+  F3          Find next
+  shift+F3    Find previous
+  ctrl+Z      Undo
+  ctrl+Y      Redo
+  ctrl+G      Go to line...
+  ctrl+Del    Delete line
+  ctrl+D      Duplicate line
+  ctrl+Up     Move text up
+  ctrl+Down   Move text down
+  ctrl+E      Select word
+
+  Tab         Increase indent for text
+  shift+
+  Backspace   Decrease indent for selected text
+  shift+Tab   Decrease indent for text
+
+  ctrl+F2     Set/Remove bookmark
+  F2          Go to next bookmark
+  shift+F2    Go to previous bookmark
+
+  ctrl+S      Save
+  ctrl+O      Open
+  ctrl+N,
+  ctrl+T      Create new
+  ctrl+W      Close File
+  ctrl+Tab    Switch to Next Tab
+
+  ctrl+F9     Compile
+  F9          Run
+  ctrl+F8     Debug
+
+  shift+wheel Horizontal scrolling
+
+  Navigating text:
+  (ctrl+)Home, (ctrl+)End, (ctrl+)PageUp, (ctrl+)PageDown
+  ctrl+Left, ctrl+Right
+
+  Navigating in search panel:
+  Tab         Move to next input field
+  shift+Tab   Move to previous input field
+  Enter       Find next occurrence
--- a/programs/develop/cedit/SHORTCUTS_RU.TXT
+++ b/programs/develop/cedit/SHORTCUTS_RU.TXT
@@ -1,55 +1,55 @@
-Горячие клавиши:
-
-  ctrl+A      выделить всё
-  ctrl+C      копировать
-  ctrl+V      вставить
-  ctrl+X      вырезать
-  ctrl+L      преобразовать в нижний регистр
-  ctrl+U      преобразовать в верхний регистр
-  ctrl+F,
-  ctrl+H      показать панель поиска/замены
-  Esc         закрыть панель поиска; закрыть меню
-  shift+Esc   скрыть (свернуть) панель поиска
-  F10         открыть главное меню
-  shift+F10   открыть контекстное меню
-  F3          найти следующий
-  shift+F3    найти предыдущий
-  ctrl+Z      отменить
-  ctrl+Y      вернуть
-  ctrl+G      перейти на строку...
-  ctrl+Del    удалить строку
-  ctrl+D      дублировать строку
-  ctrl+Up     переместить текст вверх
-  ctrl+Down   переместить текст вниз
-  ctrl+E      выделить слово
-
-  Tab         увеличить отступ для выделенного текста
-  shift+
-  Backspace   уменьшить отступ для выделенного текста
-
-  ctrl+F2     установить/снять метку
-  F2          перейти к метке ниже
-  shift+F2    перейти к метке выше
-
-  ctrl+S      сохранить
-  ctrl+O      открыть
-  ctrl+N,
-  ctrl+T      создать новый
-  ctrl+W      закрыть файл
-  ctrl+Tab    переключиться на следующую вкладку
-
-  ctrl+F9     компилировать
-  F9          выполнить
-  ctrl+F8     отладка
-
-  shift+wheel горизонтальная прокрутка
-
-  перемещение по тексту:
-  (ctrl+)Home, (ctrl+)End, (ctrl+)PageUp, (ctrl+)PageDown
-  ctrl+Left, ctrl+Right
-
-  перемещение в панели поиска:
-  Tab         к следующему полю ввода
-  Shift-Tab   к предыдущему полю ввода
-  Enter       поиск следующего вхождения
-
+Горячие клавиши:
+
+  ctrl+A      выделить всё
+  ctrl+C      копировать
+  ctrl+V      вставить
+  ctrl+X      вырезать
+  ctrl+L      преобразовать в нижний регистр
+  ctrl+U      преобразовать в верхний регистр
+  ctrl+F,
+  ctrl+H      показать панель поиска/замены
+  Esc         закрыть панель поиска; закрыть меню
+  shift+Esc   скрыть (свернуть) панель поиска
+  F10         открыть главное меню
+  shift+F10   открыть контекстное меню
+  F3          найти следующий
+  shift+F3    найти предыдущий
+  ctrl+Z      отменить
+  ctrl+Y      вернуть
+  ctrl+G      перейти на строку...
+  ctrl+Del    удалить строку
+  ctrl+D      дублировать строку
+  ctrl+Up     переместить текст вверх
+  ctrl+Down   переместить текст вниз
+  ctrl+E      выделить слово
+
+  Tab         увеличить отступ для текста
+  shift+
+  Backspace   уменьшить отступ для выделенного текста
+  shift+Tab   уменьшить отступ для текста
+
+  ctrl+F2     установить/снять метку
+  F2          перейти к метке ниже
+  shift+F2    перейти к метке выше
+
+  ctrl+S      сохранить
+  ctrl+O      открыть
+  ctrl+N,
+  ctrl+T      создать новый
+  ctrl+W      закрыть файл
+  ctrl+Tab    переключиться на следующую вкладку
+
+  ctrl+F9     компилировать
+  F9          выполнить
+  ctrl+F8     отладка
+
+  shift+wheel горизонтальная прокрутка
+
+  перемещение по тексту:
+  (ctrl+)Home, (ctrl+)End, (ctrl+)PageUp, (ctrl+)PageDown
+  ctrl+Left, ctrl+Right
+
+  перемещение в панели поиска:
+  Tab         к следующему полю ввода
+  Shift-Tab   к предыдущему полю ввода
+  Enter       поиск следующего вхождения
--- a/programs/develop/cedit/SRC/CEdit.ob07
+++ b/programs/develop/cedit/SRC/CEdit.ob07
@@ -28,7 +28,7 @@ IMPORT
    RW, Ini, EB := EditBox, Tabs, Toolbar, SB := StatusBar;

 CONST
-    HEADER = "CEdit (11-jan-2026)";
+    HEADER = "CEdit (25-jan-2026)";

    ShellFilter = "";
    EditFilter = "sh|inc|txt|asm|ob07|c|cpp|h|pas|pp|lua|ini|json";
@@ -1575,7 +1575,7 @@ VAR
 BEGIN
    menu := List.create(NIL);
    Menu.AddMenuItem(menu, menuIncInd, "increase    Tab");
-    Menu.AddMenuItem(menu, menuDecInd, "decrease    shift-Bksp");
+    Menu.AddMenuItem(menu, menuDecInd, "decrease    shift-Tab");
    RETURN Menu.create(menu, mainTID)
 END CreateMenuIndent;

@@ -1686,6 +1686,8 @@ BEGIN
    ELSE
    	IF keyCode = -1 THEN
    		key := -1
+        ELSIF (keyCode = 15) & shift THEN (* Shift-Tab *)
+            T.Indent(text, FALSE)
        ELSIF keyCode = 61 THEN (* F3 *)
            key := -1;
            IF search & (searchText # "") THEN
@@ -1755,7 +1757,7 @@ BEGIN
                    ELSE
                        SetFocus(ReplaceEdit, TRUE)
                    END
-                ELSIF keyCode = 28 THEN (* Enter *)    
+                ELSIF keyCode = 28 THEN (* Enter *)
                    IF searchOpened & (searchText # "") THEN
                        notFound := ~T.findNext(text, BKW.value)
                    END
@@ -1774,7 +1776,7 @@ BEGIN
                    ELSE
                        SetFocus(GotoEdit, TRUE)
                    END
-                ELSIF keyCode = 28 THEN (* Enter *)    
+                ELSIF keyCode = 28 THEN (* Enter *)
                    IF searchOpened & (searchText # "") THEN
                        notFound := ~T.findNext(text, BKW.value)
                    END
Author	SHA1	Message	Date
Igor Shutrov	019a63782a	cedit: Fix shortcut description	2026-03-08 10:41:00 +05:00
Igor Shutrov	555299bcd1	cedit: remove extra lines	2026-02-22 08:10:32 +00:00
Igor Shutrov	455e7ddbc1	cedit: add english shortcuts	2026-02-22 08:10:32 +00:00
Igor Shutrov	790282289e	cedit: add Shift-Tab shortcut	2026-02-22 08:10:32 +00:00