ドラゴンクエストクローンを作ろう

このエントリーをはてなブックマークに追加
19名前は開発中のものです。
>>15
DirectDrawでのTCanvasの使い方がなっていない。
WindowsAPIを使うなどとは・・・。
以下のようなクラスを作って

interface
uses
  Windows, Graphics, DirectX;
type
  TDirectDrawCanvas = class(TCanvas)
  protected
    FSurface: IDirectDrawSurface;
    FDeviceContext: HDC;
    FEnabled: Boolean;
    procedure CreateHandle; override;
  public
    constructor Create(ASurface: IDirectDrawSurface);
    destructor Destroy; override;

    procedure Release;
    property Enabled: Boolean read FEnabled;
  end;

implementation