Power Packs 2.0

Power Packs 2.0 のTipsを HIRO's.NETで公開しました

HIRO — Mon, 03 Sep 2007 00:09:00 GMT

HIRO's.NET に Power Packs 2.0 Tips 追加しました。

VB.NETはこちら。　C#はこちら。

Power Packs 2.0 角丸四角形を描いてみよう

HIRO — Sat, 01 Sep 2007 23:07:00 GMT

Power Packs 2.0 の RectangleShapeコントロールで角丸四角形を描いてみましょう。

角丸四角形を描くには、CornerRadiusプロパティを使用します。

このプロパティは、四隅の角の半径を表しています。

なので指定可能な最大値はHeight / 2 となります。

これ以上の値を設定しようとした場合には、自動で Height / 2 がセットされます。

下図はCornerRadiusを使用して角丸四角形を描いた例です。

右側は、WidthとHeightに同じ値をセットし、なおかつCornerRadiusにHeight / 2の値をセットして円を描いています。

（そんなことしなくてもOvalShapeコントロールでWidth = Heightにすれば円は描けますが...）

Power Packs 2.0 シェイプコントロールのボーダースタイル

HIRO — Fri, 31 Aug 2007 22:47:00 GMT

今回は絵で見るシリーズ Part3 です。

Part1. 絵で見る FillStyle

Part2. 絵で見るグラデーション

ボーダースタイルを設定するにはBorderStyleプロパティを使用します。

BorderStyleにはDashStyle 列挙体をセットします。

サンプルでは、BorderStyleがわかりやすいようにするため線幅(BorderWidth)を 2 にしています。

Power Packs 2.0 シェイプコントロールのグラデーション

HIRO — Thu, 30 Aug 2007 23:26:00 GMT

今日もPower Packs 2.0ネタです。

前々回、目で見るFillStyleをやったので、今回は絵で見るグラデーションです。

FillColor に SkyBlueを、FillGradientColor に Blue を指定しています。

シェイプコントロールでグラデーションを使用するには

FillStyle = PowerPacks.FillStyle.Solid

とする必要があることに注意しましょう。

Power Packs 2.0 のシェイプコントロールの動的追加について

HIRO — Wed, 29 Aug 2007 23:32:00 GMT

実はシェイプコントロールはツールボックスからドラッグ＆ドロップしたとき、フォームに直接追加されるわけではないことを知りました。

ドラッグ＆ドロップを行うと、自動でShapeContainerが追加され、その上に貼り付けられます。

ということでこのお約束を守れば動的追加を行うことができます。

お約束は

1. シェイプコントロールを表示するにはSahpeContainerが必要

2. シェイプコントロールの親はShapeContainer

3. SapeContainerの親はForm

VB.NETでのサンプルは下記の通りです

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        '1 シェイプコントロールを表示するにはSahpeContainerが必要
        Dim canvas As New Microsoft.VisualBasic.PowerPacks.ShapeContainer

        Dim rec As New Microsoft.VisualBasic.PowerPacks.RectangleShape
        rec.FillColor = System.Drawing.SystemColors.ControlDark
        rec.FillGradientColor = System.Drawing.Color.Maroon
        rec.FillGradientStyle = Microsoft.VisualBasic.PowerPacks.FillGradientStyle.None
        rec.FillStyle = PowerPacks.FillStyle.Wave
        rec.Location = New System.Drawing.Point(10, 10)
        rec.Name = "RectangleShape1"
        rec.Size = New System.Drawing.Size(100, 100)

        '2. シェイプコントロールの親はShapeContainer
        rec.Parent = canvas

        '3. SapeContainerの親はForm
        canvas.Parent = Me
    End Sub

実行結果は下記の通り

Power Packs 2.0 のシェイプコントロールのFillStyle

HIRO — Tue, 28 Aug 2007 23:32:00 GMT

久々の投稿です。

なにやらPower Packs 2.0が人気のようですね。

ネタ元:ひろえむさん

ネタ元:きょろさん

ネタ元：のんさん

FillStyleですが、言葉で説明されても、いまいちピンと来ませんよね？

ということで、「絵で見るFillStyle一覧」作ってみました。

ご参考まで。