楕円形の円弧の描画(VB)

説明:

右1/4が欠けた楕円形の円弧をピクチャボックスに描画する。

キーワード:

MoveToEx, ArcTo, LineTo

サンプルコード:

'宣言の一部
Declare Function MoveToEx Lib "gdi32" ( _
    ByVal hDC As Long, _
    ByVal X As Long, _
    ByVal Y As Long, _
    ByVal pLastPoint As Long) As Long

'楕円の描画
Private Sub Command1_Click()
    MoveToEx Picture1.hDC, 100, 50, 0
    ArcTo Picture1.hDC, 0, 0, 200, 100, 200, 0, 200, 100
    LineTo Picture1.hDC, 100, 50
End Sub



(original text:1999/02/22 更新)

本ドキュメントの内容は保証しません。本ドキュメントによって生じた結果について、一切の責任を負いません。