Lib_duo - Нереальный режим

[odd]

До сегодняшнего дня телефон мог работать только в двух режимах: в режиме форм и режиме холста. В режиме форм нельзя рисовать, а в режиме холста не работают командные кнопки. Короче, я решил исправить эту несправедливость и ввести третий режим. Назовем его "нереальным режимом". В нем есть и холст, на котором можно рисовать и возможность добавлять и отлавливать нажатия командных клавиш. Вся библиотека состоит из всего одной команды duo.show которая и включает нереальный режим.

Пример использования библиотеки:

program unreal_mode;
uses duo;
var i: integer;
        ok: command;

begin
  
  DrawLine (5, 5, 50, 50); // Рисуем линию до вызова библиотеки
  
  duo.show; // показ формы в спаренном режиме
  
  DrawLine (50, 5, 5, 50); // Рисуем линию после вызова библиотеки
  
  SetColor(255, 0, 0); DrawText('Тест', 5, 5); // Тестовая надпись
 
  ok:=CreateCommand('Выбор', CM_OK, 1); AddCommand(ok); // Добавление кнопки
  
  while (GetClickedCommand <> ok) do Delay(50); // Ожидание нажатия
  
end. 


[cherepets]

думаю, многим на форуме пригодиться)

[Trazzy]

Сообщение от odd

DrawLine (50, 5, 5, 50); // Рисуем линию после вызова библиотеки 


не работает! отображает только линию, что была нарисована до вызова библиотеки.. но все равно спасибо!))
где ты был раньше, когда требовалась такая вещь?!..

[odd]

Жаль. В эмуляторе и на SE пробовал - рисует линии как до так и после вызова.
Но спасибо за уточнение.

[Reizel]

По всей видимости, вещь интересная. Молодец

[Trazzy]

предполагаю, что на форму просто вставляется скриншот экрана)

[odd]

Ты угадал.

[Trazzy]

гг, а что ж там угадывать?!))