Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Пример отображения базовых геометрических фигур, использующих API-функции




Основные API-функции ядра для работы с пером.

В Visual Basic у объектов формы и Picture имеются методы, позволяющие рисовать. Однако они работают не так быстро, каких «двойники» из набора API-функций. Система Windows содержит много графических объектов и достаточное количество API-функций для рисования и заливки изображений. Рассмотрим некоторые из них, которые помогут повысить быстро действие приложений, создаваемых в VisualBasic. Перечислим некоторые полезные API-функции при работе с пером.

MoveToEx (ByValhdcAsLong, ByValx AsLong, ByValyAsLong, lpPointAsPOINTAPI) –перемещает перо без отображения в заданные x,y(координаты окна);

LineTo (ByValhdcAsLong, ByValx AsLong, ByValyAsLong) –перемещает перо с отображением линии от предыдущей координаты;

Rectangle (ByValhdcAsLong, ByValx1 AsLong,ByValy1 AsLong, ByValx2 AsLong, ByValy2 AsLong) –вычерчивает и заполняет текущей кистью прямоугольник с x1,y1 —координатами левого верхнего угла и x2,y2 правого нижнего угла.

Ellipse (ByValhdcAsLong, ByValx1 AsLong,ByValy1AsLong, ByValx2 AsLong, ByValy2 AsLong) –вычерчивает и заполняет текущей кистью эллипс, вписанный в прямоугольник с x1,y1 –координатами левого верхнего угла иx2,y2 правого нижнего угла.

RoundRect( ByValhdcAsLong, ByValx1 AsLong,ByValy1 AsLong, ByValx2 AsLong, ByValy2 AsLong,ByValx3 AsLong, ByValy3 AsLong) –вычерчивает и заполняет текущей кистью прямоугольник с оскругленными углами, которые определяются шириной x3 и высотой y3 вписанного эллипса. ♦ Arc (ByValhdcAsLong, ByValx1 AsLong, ByValy1 AsLong, ByValx2 AsLong, ByValy2 AsLong, ByValx3 AsLong, ByValy3 AsLong, ByValx4 AsLong, ByValy4 AsLong) –вычерчивает дугу эллипса. x1,y1,x2,y2 –координаты описанного прямоугольника. x3,y3, x4,y4 –координаты начальной и конечной точки дуги, которые в общем случае могут располагаться и не на дуге эллипса, вписанной в прямоугольник. Вычерчивание осуществляется против часовой стрелки

Chord (ByValhdcAsLong, ByValx1 AsLong, ByValy1 AsLong, ByValx2 AsLong, ByValy2 AsLong,ByValx3 AsLong, ByValy3 AsLong, ByValx4 AsLong, ByValy4 AsLong)-вычерчивает и заполняет текущей кистью сегмент эллипса.

Pie (ByValhdcAsLong, ByValx1 AsLong, ByValy1AsLong, ByValX2 AsLong, ByValy2 AsLong, ByValx3 AsLong, ByValy3 AsLong, ByValx4 AsLong,ByValy4 AsLong)-вычерчивает и заполняет текущей кистью сектор эллипса.

FloodFill (ByValhdcAsLong, ByValx AsLong, ByValуAsLong, ByValcrColorAsLong)-заливает текущей кистью область, ограниченную цветом crColor. x, y —внутренняя точка области.


Отобразить базовые геометрические фигуры, используя API-функции Windows. PrivateSubCommand1_Click() DimOldBrushAsLong, BrushAsLong, PenAsLong,OldPenAsLong, i AsInteger, mLPAsLOGPENDimW AsPOINTAPI, lppAsPOINTAPIBrush= CreateSolidBrush (RGB (0, 255, 0))OldBrush= SelectObject (Form1.hdc, Brush)W.x=1Fori = 1 To6'Отображение фигур различными стилями пера 1…6

WithmLP. lopnStyle= i 'Задаем стиль линии.lopnWidth= W.lopnColor= &HFF




Поделиться с друзьями:


Дата добавления: 2014-12-23; Просмотров: 355; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.008 сек.