掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ImgEditについて知りたいのですが (ID：83838)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
根本的に異なります イメージ表示処理 With ImgEdit1 .Image = "XXX.tif" .Display .FitTo (0) lngZoom= CLng(.Zoom) ' 現在の拡大率を退避 End With 拡大処理 ' 設定値内(〜Max倍率)での(表示倍率 + 10)% Set goImg = ImgEdit1 goImg.Zoom = lngZoom + 10 縮小処理 上記、拡大とほぼ同様に 補足： ImgEditの表示域内での表示なので 内部で現在の表示されているイメージが イメージの"高さ"に合わせた倍率なのか"幅"なのかを持っておき 拡大/縮小の際に設定すればよいかと思います
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.