Предикат invalidate/0:

Определение предиката onPaint имеет вид:

                  onPaint(_, _, GDI):-                      GDI:clear(color_Green).  

В результате вызова подцели invalidate()

Определение предикатов обработки событий onPaint и onMouseDbl имеет вид:

    onPaint(_Source, rct(10, 10, 20, 20), GDI):- !,        GDI:clear(color_Yellow).    onPaint(_Source, _Rectangle, GDI):-         	        GDI:clear(color_Gray).    onMouseDbl(_Source, _Point, _ShiftControlAlt, _Button):-        invalidate(rct(0, 0, 20, 20)).

Что произойдет после двойного щелчка мыши?

Определение предикатов обработки событий onPaint и onMouseDown имеет вид:

    onPaint(_Source, rct(10, 10, 20, 20), GDI):- !,        GDI:clear(color_Red).    onPaint(_Source, _Rectangle, GDI):-         	        GDI:clear(color_Green).    onMouseDown(_Source, _Point, _ShiftControlAlt, _Button):-        invalidate(rct(10, 10, 20, 20)).

Что произойдет после щелчка мыши?

Определение предикатов обработки событий onPaint и onSize имеет вид:

    onPaint(_Source, rct(0, 0, 10, 10), GDI):- !,        GDI:clear(color_Red).    onPaint(_Source, _Rectangle, GDI):-         	        GDI:clear(color_Blue).    onSize(_Source):-        invalidate().

Что произойдет при небольшом изменении размеров окна стандартного размера?

Определение предиката onPaint имеет вид:

                  onPaint(_, _, GDI):-                      GDI:clear(color_Green),                      GDI:clear(color_Red) .  

В результате вызова подцели invalidate() клиентская область окна будет закрашена

Окно drawForm должно открываться по нажатию кнопки Ok окна Note, которое открывается при выборе пункта главного меню File -> New. В определении предиката обработки события вызова этой команды меню достаточно поставить подцели:

Определение обработчика событий выбора пункта меню File -> New главного окна приложения имеет вид:

    onFileNew(_Source, _MenuTag):-        vpiCommonDialogs::note("Hello, World!"),        Form = drawForm::display(This),        Form:setText("Hello!").

Пользователь выбрал команду меню File -> New, а потом закрыл окно Note. Где будет выведен текст "Hello!")?

Окно drawForm должно открываться по нажатию кнопки Ok окна familyForm. В определении предиката onOkClick достаточно подставить подцель:

Определение обработчика событий выбора пункта меню File -> New главного окна приложения имеет вид:

    onFileNew(_Source, _MenuTag):-        vpiCommonDialogs::note("Hello!"),        _ = drawForm::display(This),        setText("Hello, World!").

Пользователь выбрал команду меню File -> New. Где и когда появится текст "Hello, World!")?

Определение факта-переменной rbtree и предиката create имеют вид:

    facts        rbtree : tree{integer, integer} := emptyUnique().    clauses        create():-             X = std::fromTo(1, 10),             rbtree := insert(rbtree, X mod 3, X div 3).

Укажите значение, которое примет переменная X после вызова цели create(), X = tryLookUp(rbtree, 0):