VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[過去ログ]
[管理用]
| 投稿日 | ： 2003/12/25(Thu) 15:32 |
| 投稿者 | ： 魔界の仮面弁士 |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: BitBltの使い方、他 |
# 全角・半角の使い分けは適切に。
> 初期Ｆｏｒｍをスクリーンの中央に表示し、そのＦｏｒｍの背景を「その位置」の
> スクリーンの画像にしたい。
背景を描画するのではなく、本当に「透過」させてしまっても良いならば、
「Layered Window」を使うという手もありますよ。
> ただし、Ｆｏｒｍを動かしたときは、今は考えない。
とりあえず、MovableプロパティをFalseにしてしまうとか。
他のウィンドウの移動は制限できませんが、少なくとも自フォームだけは動かなくなりますよね。
> ＰｉｃｔｕｒｅＢｏｘを経由したのは、いきなり
> Ｆｏｒｍ１．Ｐｉｃｔｕｒｅ＝Ｃｌｉｐｂｏａｒｄ．ＧｅｔＤａＴａでは画像が
> （０，０）からとなるためです。
例えば、
Form1.PaintPicture Clipboard.GetData(vbCFBitmap), 〜〜〜
のようにしてみるとか。
あるいは、一度 Picture型 か StdPicture型の変数に受けて、
Dim P As StdPicture
Set P = Clipboard.GetData(vbCFBitmap)
Form1.PaintPicture P, 〜〜〜
のように書いても良いかも。
> Private Sub Form_Load()
> 'スクリーンの中央に置く
> Top = (Screen.Height - Form1.Height) \ 2
> Left = (Screen.Width - Form1.Width) \ 2
> End Sub
このようなコーディングをせずとも、デザイン時に
StartUpPosition プロパティを設定しておくだけで十分なのでは。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）