DrawLine Color
Posted: 29 Jan 2014 21:09
hi
how can draw line with specified color ?
how can draw line with specified color ?
Code: Select all
predicates
onPaint : drawWindow::paintResponder.
clauses
onPaint(_Source, _Rectangle, GDI):-
My_color = color_Blue,
GDI:setPen(pen(1,ps_Solid,My_color)),
GDI:drawLine(pnt(10,10),pnt(100,100)).