・Delphi6（6以外はコンパイルしたことないのでわからない）
・DDDD（QD）
・DirectX7以上をサポートしたVGA（ビデオカード）

こんなかんじ？最近のPCなら動きます（笑

Direct3Dを使います。
VGAが対応して無ければこのお話は無かったことに・・（藁
また、テクスチャの仕様上、サイズが必ず２の累乗の正方形という制限が付きます。

よく、敵キャラをパーツに分けると同じBMPファイルを何枚も読み込む場合があります。こういう場合、同じ内容な訳ですからかなり無駄です。それに、ビデオメモリも限られた資源です。
そこで、同じBMPを重複して読み込んでも、内部で重複をまとめ、一枚に統括する機構を備え付けてあります。

おい焼き？彩度？

TAlpha32

マスク用αチャンネルを自動生成する場合、どの方法を用いるかを設定する。

AM_BINARY（二値化）
AM_GRAY（８近傍グレースケール）

Global

constructor TAlpha32.Create(tQD : TDDDD);

procedure TAlpha32.Free;

procedure TAlpha32.DrawPoly(
src: TDDDDTexture;
sx1, sy1, sx2, sy2, sx3, sy3, sx4, sy4,
dx1, dy1, dx2, dy2, dx3, dy3, dx4, dy4: single;
col: DWORD;
BM: BLENDMODE;
pri: Integer
);

procedure TAlpha32.DrawTex(
src : TDDDDTexture;
sx1,sy1,sx2,sy2 : Single;
dx1,dy1 : Single;
sw,sh,r : Single;
col : DWORD;
BM : BLENDMODE;
Pri : Integer
);

伸縮・回転を機能を備えた単形（四角形）テクスチャ転送です。

srcにnilを渡せば、テクスチャを伴わない転送も可能。

procedure TAlpha32.DrawCurve(
src: TDDDDTexture;
sx1, sy1, sx2, sy2: Single;
dxa, dya: array of Single;
count: Integer;
Size:Single;
col: DWORD;
BM: BLENDMODE;
pri: Integer
);

連続線分（曲線）を表示します。
線分と線分の継ぎ目は中間法を用いて補完されます。

srcにnilを渡せば、テクスチャを伴わない転送も可能。

procedure TAlpha32.DrawSuf(
src : TDDDDSurface;
sx1,sy1,sx2,sy2 : Single;
dx1,dy1,sw,sh : Single;
ColorKey : Boolean;
pri:Integer
);

サーフェイス転送です。テクスチャ転送と混合して使用することが出来ます。
DirectX7ヘルプには、テクスチャとの混合使用は望ましくないそうです。
・・・・使うかどうかはあなた次第・・・・

procedure TAlpha32.FillRect(
sx,sy,ex,ey : single;
col : DWORD;
BM : BLENDMODE;
Pri : Integer
);

単形転送。
画面全域を塗りつぶすときぐらいかな・・・使うとしたら。

procedure TAlpha32.DrawTexLine(
src : TDDDDTexture;
sx1,sy1,sx2,sy2 : single;
dx1,dy1,dx2,dy2,
size : single;
col : DWORD;
BM : BLENDMODE;
Pri : Integer
);

テクスチャを模様を使って線を引きます。
レーザーとかに使えと言わんばかりです（何

srcにnilを渡せば、テクスチャを伴わない転送も可能。

procedure TAlpha32.DrawLine(
dx1,dy1,dx2,dy2,size : single;
col : DWORD;
BM : BLENDMODE;
Pri : Integer
);

線を引きます。AAはしませんからちょっと汚いかも（ぉ

procedure TAlpha32.Rendering;

優先順位にしたがってソーティングし、 バックバッファに描画（反映）します。
Flipは各自で行ってくださいね〜。

バックバッファの内容は消去はしませんので、あらかじめ画像を描画しておいて合成させる事も可能です。

procedure TAlpha32.SetAspect(w,h : Single);

画面描画比を調整できます。

640x480で作っていたものを1280x960で画面イッパイに表示させたいときなどに使います。この場合は縦・横比を2.0にします。

画面を小さくするとマシンパワーの無い人に有効です。が、DrawSufによってサーフェイスも描画している場合は逆に遅くなる場合があります。（伸縮処理により等倍転送の方が断然速いので）

procedure TAlpha32.Clear(col : DWORD);

指定色でバックバッファを消去します。（ついでにZ-Bufferもクリアしちゃうよ）

ただし、このカラーはバックバッファのピクセルフォーマットに依存します。

function TAlpha32.LoadTexture(
filename : String
) : TDDDDTexture;

ファイル重複機能を用いてテクスチャを読み込みます。
対応画像形式は「.bmp」と「.jpg」です。
アルファチャンネル情報はファイル名の最後に「_A」をつけることで指定します。
カラー画像：Image1.bmp
α画像：Image1_A.bmp

function TAlpha32.FreeTexture(
var t:TDDDDTexture
):Boolean;

LoadTextureによって読み込んだ場合はこれを使って解放してクダサイ。

procedure TAlpha32.AL32_DebugMessage(mes : string);

AlphaLib32専用デバッグファイルにログを書き出します。