d7 用delphix里的dxdraw画黑白像素地图 surface怎么申请变量

在Delphi中，使用DxDraw库（也称为dxgdi或DirectX Draw）绘制黑白像素地图，首先需要创建一个Surface（表面），这个Surface相当于一个内存区域用于存储图像数据。以下是如何申请一个Surface的步骤：

1. **包含必要的库**：你需要包含`DxGraphics`或`Graphics.TBitmap`等相关的Delphi图形库，以便使用DxDraw的功能。

2. **初始化DxGraphics对象**：如果你使用的是`DxGraphics`，可以这样做：

   var
     Gfx: TDxGraphics;
   begin
     Gfx := TDxGraphics.Create nil; // 创建一个新的DxGraphics对象
     // 初始化DxGraphics，如设置屏幕宽度和高度
     Gfx.SetDevicePrimarySurface(Width, Height);
   end;

3. **申请Surface**：

   var
     Surface: TIDxSurface;
   begin
     // 获取DxGraphics的Surface对象
     Surface := Gfx.Surface;
     
     // 如果需要指定大小，可以这样创建：
     var MySurface: TCustomDxSurface = TCustomDxSurface.Create(nil, Width, Height);
     // 或者从已有的位图转换而来：
     MySurface := TCustomDxSurface.FromBitmap(Bitmap); // Bitmap是你想要转换的黑白位图
   end;

4. **操作像素**：有了Surface，你可以遍历其像素并设置黑色（0）或白色（255）：

   for Y := 0 to Surface.Height - 1 do
   begin
     for X := 0 to Surface.Width - 1 do
     begin
       // 获取当前像素值（通常是一个TColor）
       var PixelValue: TColor := Surface.Pixels[X + (Y * Surface.Stride)];
       
       // 将像素设置为黑白
       if SomeConditionThen
         PixelValue := clBlack
       else
         PixelValue := clWhite;
         
       // 设置新的像素值
       Surface.Pixels[X + (Y * Surface.Stride)] := PixelValue;
     end;
   end;