M I D l e t P a s c a l DrawLine
Рисует прямую линию между точками с координатами (x1, y1) и (x2, y2). Операция проходит в буфере экрана. procedure DrawLine(x1, y1, x2, y2: integer); Пример begin DrawLine(10, 15, 25, 35); Repaint; Delay(1000); end. Совместимость
Пример
begin DrawLine(10, 15, 25, 35); Repaint; Delay(1000); end.
MIDP1.0
Не требуется
Смотри также
SetColor, Repaint