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

Разработка приложений на языке Visual Prolog

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

    onPaint(_, _, GDI):-        GDI:setPen(pen(1, ps_Solid, color_Red)),        GDI:drawLine(pnt(0, 100), pnt(200, 100)),        GDI:setPen(pen(1, ps_Solid, color_Blue)),        GDI:drawLine(pnt(100, 0), pnt(100, 200)).

Определите цвета отрезков:

(Отметьте один правильный вариант ответа.)

Варианты ответа

Оба отрезка будут синего цвета

Вертикальный отрезок будет синего цвета, а горизонтальный красного(Верный ответ)

Оба отрезка будут красного цвета

Горизонтальный отрезок будет синего цвета, а вертикальный красного

Похожие вопросы

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

    onPaint(_, _, GDI):-        GDI:setPen(pen(1, ps_Solid, color_Yellow)),        GDI:drawLine(pnt(100, 100), pnt(200, 200)),        GDI:setPen(pen(5, ps_Solid, color_Green)),        GDI:drawLine(pnt(100, 200), pnt(200, 100)).

Определите цвета отрезков:

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

    onPaint(_, _, GDI):-		Pnt = pnt(100, 100),        		L = [pnt(0, 0), pnt(100, 100), pnt(100, 200), pnt(200, 100)],list::forAll(L, {(Pnt1):- GDI:drawLine(Pnt, Pnt1)}).

Сколько отрезков будет содержать изображение?

Определение предикатов обработки событий 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() клиентская область окна будет закрашена

Определение предикатов обработки событий 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 имеет вид:

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

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

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

    onPaint(_, _, GDI):-        getClientSize(W, H),          GDI:drawArc(rct(0, 0, W, H), pnt(0, H div 2), pnt(W div 2, H)).

Дуга отображается

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

    onPaint(_, _, GDI):-        getClientSize(W, H),          GDI:drawArc(rct(0, 0, W, H), pnt(W div 2, 0), pnt(W div 2, H)).

Дуга отображается

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

    onPaint(_, _, GDI):-        getClientSize(W, H),          GDI:drawArc(rct(0, 0, W, H), pnt(W, H div 2), pnt(0, H div 2)).

Дуга отображается

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

	    onPaint(_Source, _Rectangle, GDI):-                    GDI:pictDraw(bgpict, pnt(0, 0), rop_SrcCopy).

Как отобразится изображение bgpict?