[過去ﾛｸﾞ] Delphiゲームプログラミング相談室 (976ﾚｽ)

Delphiゲームプログラミング相談室 http://echo.5ch.net/test/read.cgi/gamedev/1006249204/

上下前次1-新
通常表示 512ﾊﾞｲﾄ分割 ﾚｽ栞

---

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索 歴削→次ｽﾚ 栞削→次ｽﾚ 過去ﾛｸﾞﾒﾆｭｰ

---

296: 290 [sage] 03/05/25 17:23 ID:ll42N4KR >>295 ソース拝見いたしました。 > ・For文で回してる処理が非常に遅い（scanlineのせい？） マスクを作るプロシージャにて、パレットコードを String に変換している 為と思われます。 procedure TForm1.make_mask(sBmp:TBitmap); var i,j, x : Integer; p : PDWORD; mp : PBYTEArray; begin for i:=0 to sBmp.Height-1 do begin p := sBmp.ScanLine[i]; // ビットマップ座標(0,i)のポインタ mp := mask.ScanLine[i]; x :=0; for j:=0 to sBmp.Width-1 do begin if p^ = $00000000 then //if str_mask = '000' then begin mp[x]:=$ff; mp[x+1]:=$ff; mp[x+2]:=$ff; // B=255 , G=255 , R=255 end else begin mp[x]:=$00; mp[x+1]:=$00; mp[x+2]:=$00; // B=0 , G=0 , R=0 end; Inc(p); Inc(x,3); end; end; end; ……と、いうのは如何でしょう？（ PDWORD よりも PDCHARArray の方が わかりやすいでしょうか） http://echo.5ch.net/test/read.cgi/gamedev/1006249204/296

---

ﾒﾓ帳

(0/65535文字)

---

上下前次1-新書関写板覧索設栞歴

---

あと 680 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

Google検索

Wikipedia

---

ぬこの手 ぬこTOP 0.020s