[戻]-35366/ﾚｽ

---

Re[5]: 画像のスクロール

---

魔界の仮面弁士

■No35365に返信(ま〜さんの記事)
> ここは昔（VB6）と変わらないので何とか使えてます
>
> 'ワールド変換行列を単位行列にリセット
> g.ResetTransform()
> の仕組みが分からないのですがこれはどう考えれば宜しいでしょうか？

VB6 時代の描画命令でも、座標系の変更はできましたよね。
回転はなくてスケーリング程度ですが。

Private Command1_Click()
　'座標系をリセットする
　Picture1.Scale
　'左上から 四分の一程度右下にずらした位置を、原点座標とする
　Picture1.Scale (-50, -50)-(150, 150)

　'赤箱はボックス中央に描かれる
　Picture1.Line (0, 0)-(100, 100), vbRed, BF

　'座標系をリセットする(左上が原点の Twips 座標系)
　Picture1.Scale

　'青箱はボックス左上に描かれる
　'(赤箱と同じ指定だが、座標系が異なるので描画位置も変化する)
　Picture1.Line (0, 0)-(100, 100), vbBlue, BF
End Sub


VB6 で座標系をユーザー定義単位系に変更する場合
　Picture1.ScaleMode = vbUser
　Picture1.Scale (x1, y1)-(x2, y2)
など� -->続き

02/06 13:51
[編|消]

---

次のﾚｽ>
35361のﾚｽ
35366にﾚｽを書く
<前のﾚｽ

---

Child K-Tai