M I D l e t P a s c a l
SetClip

Задает условный прямоугольник на экране, в котором будут выполняться все графические функции. Всё, что выходит за границы данного прямоугольника, рисоваться не будет (будет игнорироваться). Координаты (x, y) - это координаты левого верхнего угла прямоугольника, width и height - соответственно ширина и высота прямоугольника.

procedure SetClip(int x, int y, int width, int height);
 



Пример

begin
    // Закрашиваем экран черным цветом
    SetColor(0, 0, 0);
    FillRect(0, 0, GetWidth, GetHeight);
    Repaint;
    Delay(2000);

    // Всё стираем
    SetColor(255, 255, 255); FillRect(0, 0, GetWidth, GetHeight);

    // Закрашиваем весь экран черным опять, но уже с указание области
    SetColor(0, 0, 0);
    SetClip(10, 10, 35, 35);
    FillRect(0, 0, GetWidth, GetHeight);
    Repaint;
    Delay(2000);
end.





Совместимость

MIDP1.0




Требуемый модуль

Не требуется




Смотри также

FillEllipse, GetWidth, GetHeight, SetColor, Repaint