OberonCore
https://forum.oberoncore.ru/

How to custom A2?
https://forum.oberoncore.ru/viewtopic.php?f=22&t=6472
Страница 1 из 1

Автор:  luowy [ Четверг, 07 Ноябрь, 2019 06:27 ]
Заголовок сообщения:  How to custom A2?

Hi,A2 Experts

the A2 has some innovative operations, but some not suit for me,
if I want to use it as a develop platform, has to custom it for my old habits;

1,the first question is font , I have ask Felix for it by email,
though not too understanding his answer, but now the question seems gone, not so unbearable;

2, the second question is double-click action;
I am not used to double-clicking the action that triggers the command.
I want to change it from "double-click" to "ctl"+"double-click" to trigger command,
with double-click to select text words;

I tried to solve the second problem several times, but failed.
This stop me from continuing to explore A2.

how to do it? Who has such a solution?
thanks in advance

Автор:  Ярослав Романченко [ Четверг, 07 Ноябрь, 2019 09:54 ]
Заголовок сообщения:  Re: How to custom A2?

Hi!

As regarding the 1st first your question, it's not clear what font do you mean, the default font of GUI, the font for source code, the font of messages in KernelLog? In all such places different fonts used and configured differently, some of them configurable rather simple, some not...
Please, clarify, what you mean.

For the second question the answer is rather simple. Just tweak a bit the method PointerUp, that you can find in WMTextView.Mod (there is only one such place in the module).
It's how it looks originally:
Код:
      PROCEDURE PointerUp*(x, y : SIZE; keys : SET);
      BEGIN
         IF canStart & (commandMarker # NIL) THEN
            commandMarker.Sort;
            StartCommand((commandMarker.a + commandMarker.b) DIV 2, openFile);
            AbortStart
         END;

Modify it in such way, recompile the module and restart the system (for changes to take effect):
Код:
      PROCEDURE PointerUp*(x, y : SIZE; keys : SET);
      BEGIN
         IF canStart & (commandMarker # NIL) THEN
            IF modifierFlags * Inputs.Ctrl # {} THEN
               commandMarker.Sort;
               StartCommand((commandMarker.a + commandMarker.b) DIV 2, openFile);
            END;
            AbortStart
         END;

Feel free to ask more questions here or on A2 tracking system board (have you already registered here?)

Автор:  luowy [ Четверг, 07 Ноябрь, 2019 11:53 ]
Заголовок сообщения:  Re: How to custom A2?

thanks Yaroslav
The modified code works fine. though it can't select a word as I wanted;
another question, The mouse movement becomes very slow, when you keep pressing the shift key,
I will join the A2 community and ask question here and there;

luowy

Автор:  Sergej Durmanov [ Четверг, 07 Ноябрь, 2019 13:51 ]
Заголовок сообщения:  Re: How to custom A2?

Hi, friend. You can highlight a word by clicking again on the same word (this is not a double click! There should be some time off between clicks). Running a command works not only by double-clicking, but also by single-clicking with the middle button (wheel).

Автор:  luowy [ Четверг, 07 Ноябрь, 2019 16:10 ]
Заголовок сообщения:  Re: How to custom A2?

fine, i got it.
many thanks

Страница 1 из 1 Часовой пояс: UTC + 3 часа
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/