Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Алексей Немиро -

Visual Basic .NET - Графика

Все примеры / Мультимедиа / Графика

Рисвание градиентной заливки

Автор: Алексей Немиро | добавлено: 05.03.2010, 19:50 | просмотров: 1434 (2+) | комментариев: 0 | рейтинг: *x1
Простой пример рисования градиентной заливки.

Код

Protected Overrides Sub OnPaint(ByVal pe As PaintEventArgs)
  DrawGradient(Color.Blue, Color.Firebrick, Drawing.Drawing2D.LinearGradientMode.Horizontal)
End Sub

Private Sub DrawGradient(ByVal color1 As Color, ByVal color2 As Color, ByVal mode As System.Drawing.Drawing2D.LinearGradientMode)
  Dim a As New System.Drawing.Drawing2D.LinearGradientBrush(New RectangleF(0, 0, Me.Width, Me.Height), color1, color2, mode)
  Dim g As Graphics = Me.CreateGraphics
  g.FillRectangle(a, New RectangleF(0, 0, Me.Width, Me.Height))
  g.Dispose()
End Sub

Private Sub DrawGradientString(ByVal Text As String, ByVal color1 As Color, ByVal color2 As Color, ByVal mode As System.Drawing.Drawing2D.LinearGradientMode)
  Dim a As New System.Drawing.Drawing2D.LinearGradientBrush(New RectangleF(0, 0, 100, 19), color1, color2, mode)
  Dim g As Graphics = Me.CreateGraphics
  Dim f As Font
  f = New Font("Arial cyr", 20, FontStyle.Bold, GraphicsUnit.Pixel)
  g.DrawString(Text, f, a, 0, 0)
  g.Dispose()
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  DrawGradientString("Kbyte.Ru рулит ;-)", Color.Blue, Color.Firebrick, Drawing.Drawing2D.LinearGradientMode.Vertical)
End Sub
Об авторе

Алексей Немиро

Интернет-деятель. Автор многочисленных статей и переводов статей по программированию и информационным технологиям. Работы Алексея можно найти в популярных печатных изданиях компьютерной тематики. Автор проекта Kbyte.Ru.
Сейчас Алексей занимается профессиональным Web-программированием на базе технологий .NET Framework. Иногда пишет различные программки и компоненты для Windows и Android. В свободное время занимается Web-дизайном, увлекается фото- и видеосъемкой.

См. также:
Профиль автора
Алексей Немиро
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Люди на Kbyte.Ru
Реклама
Счетчики