■ 現在のこのページの役立ち度:
表示されない場合こちらのリンクからもご覧になれます。
■ このページの役立ち度を評価する:
役立ち度を評価してください。
(1(左):あまり役立たない - 5(右):大変役立った):
■ ページの共有:
[ サイト内検索 ]
カスタム検索
#7402-0RE#7382:絵がみえない・・・bear2000-02-07(月) 21:33
     #7403-0RE#7402:絵がみえない・・・bear2000-02-07(月) 22:46
#7402-0
RE#7382:絵がみえない・・・
> 背景に絵を置いてその上にまた絵をもてくるプログラムなんですが、出来ないんです。
> 背景の絵だけが強調されてその上にくる絵がうつらないと言う状況です。
> 何でも良いのでアドバイスをお願いします。

APIのBitbltを使ったらいかがでしょうか?

Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As
 Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As 
Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long

上のように宣言をして
ret=BitBlt(描画先のデバイスコンテキスト、X座標、Y座標、幅、高さ、描画元のデバイスコンテキスト、元のX座標、元のY座標、コピー方法)
'デバイスコンテキストは、オブジェクト名.hDCで表すことが出来ます。

という風にすれば使えます。
コピー方法はvbsrccopy・・でいいと思います。ちがってたらすみませんヘルプをみてください。
このとき両方のオブジェクトのプロパティのautoredrawとautosizeをtrueにしとかないと
へんなことになります。見当ちがいの答えだったらごめんなさい・・。
#7403-0
RE#7402:絵がみえない・・・
追伸
それぞれのプロパティのscalemodeは3(ピクセル)にしてください。
あとオブジェクト名.Refresh としないと絵がでません。
このページと関連する記事:
#4560-0デスクトップにお絵かき1999-09-05(日) 05:10
#12360-0APIでライン描画1999-12-24(金) 16:53
#7384-0RE#7382:絵がみえない・・・2000-02-07(月) 10:38
#11422-0twipとpixelの変換と、座標の原点の設定法1999-12-10(金) 16:41
#13570-0透過処理について2000-12-21(木) 00:01
#617-1フォームの外の画面の色の取得について2003-12-18(木) 09:12
#39039-0Printerオブジェクトについて2001-02-17(土) 18:42
#2330-1バケツツールを作りたいのですが1999-07-29(木) 22:56
#1663-1背景を透過したイメージについて1999-07-19(月) 23:34
#29126-0オブジェクトの大きさをピクセル単位で計測するには?2002-06-01(土) 01:19
お探しの情報は見つかりましたか?お困りの問題は解決しましたか?
サイト内検索, 似た記事検索で見つからなくてもあきらめずに掲示板で質問してみましょう。
VB初心者友の会があなたのお役に立てれば幸いです。また、本ページの投稿者の方々にこの場を借りて感謝致します。
本ページは過去ログを集めて自動構成しています。よろしければこのページに関するフィードバックをお願いします。
(※ 構成の誤り、広告等の不適切な記事、リンク切れ、読めないページの報告など)