4

グラデーションの背景色でフォームをペイントし、透明度のある画像を重ねることを達成しようとしています。

これは可能ですか？

背景が透明なタイルの背景画像を使用し、カスタムの線形グラデーションで背景をペイントします。

4

2 に答える 2

8

私はそれをやります!, 私はあなたと私の解決策を共有したいです (それはとても簡単です):

外部ヘルプ:イメージを使用してシェイプを並べて表示

Private Sub BackgroundGradient(ByRef Control As Object, _
                                ByVal Color1 As Drawing.Color, _
                                ByVal Color2 As Drawing.Color)

    Dim vLinearGradient As Drawing.Drawing2D.LinearGradientBrush = _
        New Drawing.Drawing2D.LinearGradientBrush(New Drawing.Point(Control.Width, Control.Height), _
                                                    New Drawing.Point(Control.Width, 0), _
                                                    Color1, _
                                                    Color2)

    Dim vGraphic As Drawing.Graphics = Control.CreateGraphics
    ' To tile the image background - Using the same image background of the image
    Dim vTexture As New Drawing.TextureBrush(Control.BackgroundImage)

    vGraphic.FillRectangle(vLinearGradient, Control.DisplayRectangle)
    vGraphic.FillRectangle(vTexture, Control.DisplayRectangle)

    vGraphic.Dispose() : vGraphic = Nothing : vTexture.Dispose() : vTexture = Nothing
End Sub
于 2012-06-01T14:29:55.563 に答える
4

グラデーションの背景を描画する方法は次のとおりです。Windows API などを使用しない限り、画像のタイリングは遅くなります。

Imports System.Drawing

Public Class frmBG

  Private Sub frmBG_Paint(sender As Object, e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
    Dim g As Graphics = e.Graphics
    Dim p1 As Point = Me.ClientRectangle.Location
    Dim p2 As Point = New Point(Me.ClientRectangle.Right, Me.ClientRectangle.Bottom)
    Using brsGradient As New System.Drawing.Drawing2D.LinearGradientBrush(p1, p2, Color.Red, Color.Blue)
      g.FillRectangle(brsGradient, e.ClipRectangle)
      g.DrawImage(My.Resources.demoImage, Me.ClientRectangle.Location)
    End Using

  End Sub

  Private Sub frmBG_ResizeEnd(sender As Object, e As System.EventArgs) Handles Me.ResizeEnd
    Me.Invalidate()
  End Sub
End Class
于 2012-06-01T07:11:50.983 に答える