VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2003/11/01(Sat) 08:55
投稿者花ちゃん
Eメール
URL
タイトルRe: やってみたのですが(訂正)

>(160×120ピクセルで5秒程度)
それほどかかりますかね?前期のプログラムの処理以外の部分に時間が掛かっているのでは
ないでしょうか?
363×258ピクセルの画像を前記のプログラムで実行すれば1秒〜2秒で処理できるはずですが
Win98 SE Celeron 466MHz VB6.0 pColor = Picture1.Point(x, y)

Picture1.PSet (x, y), RGB(pColor, pColor, pColor)
の部分をAPIの GetPixel(hDC1, x, y) と SetPixelV hDC2, x1, y1, c に置き換えると
若干早くなります。

それ以上早くするには
GetDIBits
SetDIBits
CreateCompatibleBitmap
SelectObject
DeleteObject
以上のAPIを使用すればかなり早くなります。
関数名で検索すればサンプルも見つかります。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -