[ ホーム ] [ TIPS ウィンドウズ系 ] [ TIPS グラフィックス系 ] [ TIPS メルチメディア系 ] [ TIPS 理数系 ] [ TIPS 総覧 ]

上へ
G0001 色名一覧
G0002 アルファブレンド
G0003 カラーマップを作る
G0101 曲線の数値化
G0102 曲線長を測る
G0103 曲線の接線・法線
G0104 曲線のスムージング
G0201 図形の回転
G0202 領域の認識
G0301 文字の線形変換
G0302 文字の自由変形
G0303 文字の極座標変換
G0304 曲線に沿った文字列
G0305 飾文字-中抜き
G0306 飾文字-縁取り
G0307 飾文字-ドロップダウンシャドウ
G0501 画像の線形変換
G0502 画像の透明化
G0503 画像の任意形状切出し
G0504 画像の回転
G0505 画像の高速処理化

●解説

　文字は通常ブラシで描画（レンダリング）されるので、概ねソリッドな状態で描かれる。文字も図形の範疇であり、他のGraphicオブジェクトと同じ処理が可能である。 

●原理

　　パスを応用する。パスとは閉じた図形の軌跡（経路）の集合体で、オブジェクトとして利用できる。

●方法 　

　文字列をパス化し、そのパスをペンで描く。当然、必要であればブラシで塗りつぶしも可能。

●実例 

    Dim g As Grapics = XXXXXXXX
    Dim pa1 As New GraphicsPath                         'Pathオブジェクトを確保
    Dim fmt As New StringFormat()
    fmt.Alignment = StringAlignment.Center
    fmt.LineAlignment = StringAlignment.Center　　　　'この例では文字列の中心で揃える
    pa1.Reset()　　　　　　　　　　　　　　　　　　　　　　　　 '繰り返しpa１を利用する場合はリセットしておく
    '以下が、パスとして文字列を追加するメソッド。フォントスタイルはIntegerにする。文字サイズはピクセルサイズである。
    pa1.AddString(“Path”, New FontFamily("ＭＳ Ｐゴシック"), CInt(FontStyle.Bold), (文字サイズ), New PointF(X,Y), fmt)
    pa1.CloseFigure()　　　　　　　　　　　　　　　　　　　　　'パスの描画を終了
    Dim p As Pen = New Pen(Color.Red, 2)
    g.DrawPath(p, pa1)                                         'パスをペンで描く
    *.Dispose()                                                   '不要なオブジェクトを破棄