Delphi TBitmap 代码到 Python PIL

Question

我正在尝试将一些 Delphi 代码转换为 Python PIL。问题是两方面的。首先，我不是 Delphi 程序员。其次，我今天之前没有使用过 PIL，所以我可能在这两个方面都有问题。

case PixelFormat of
  pf32bit: PixSize:=4;
  pf24bit: PixSize:=3;
  pf16bit: PixSize:=2;

end;
BitCounter:=0;
for i:=0 to Height-1 do begin
  Row:=ScanLine[i];
  PB:=@Row[PixSize-1];
  for j:=0 to Width-1 do begin 
    Ch[BitCounter] := (PB^ and 1);
    ....
    inc(BitCounter);
    inc(PB, PixSize);
end;

所以我知道 PixelFormat 属性表示每个像素的大小（以字节为单位）。我还知道 ScanLine 方法应该获取代表线条的像素数组。我没有得到的是，我倾向于将每个像素可视化为 RGB 值。我习惯于提取颜色值的最低有效位。但是，我认为我什至不确定现有代码正在提取什么。我有一些 python PIL 代码可以提取同一图像中每个像素的 RGB 值，但我不知道 RGB 值的元组与前面代码中获得的 PB 变量相比如何。根据一些实验，我猜它根本无法比较。

提前致谢。

Answer 1

以防以后有人尝试这样做。感谢 David 帮助澄清 ScanLine 返回的内容。

from PIL import Image
img = Image.open('picture.gif')
(width, height) = img.size
conv = img.convert("RGB").getdata()
bt = []
for h in range(height):
  for w in range(width):
    pixel = conv.getpixel((w, h))[0]    # getpixel returns a tuple (R,G,B)
    bt.append((pixel & 0x1))

Answer 2

这将有助于显示您正在使用的变量是如何定义的，这样我们就可以看到您尝试使用它们做什么。也就是说，ScanLine 属性是一个数组，表示代表像素的字节。也就是说，您需要一个像 case 语句这样的小函数来确定字节数。但是您需要将每个 ScanLine 作为指向字节数组的指针拉出。

所以 ScanLine 数组中的条目数是 Bitmap1.Height，这意味着您拥有正确的部分。但其余的有点不同。假设我们将一个名为 row 的变量定义为一个指针。然后要在数组中找到特定的像素，您必须相应地设置另一个指针。

不确定这是否得到它，因为它经过了非常轻微的测试。我只是用 Longint 来表示我拉回的像素数据。您可以使用更适合您需要的东西来提取 RGB 数据，但希望这能演示如何处理 ScanLine 属性以从中获取您需要的像素数据：

var
  i, j: integer;
  row: pointer;
  pixel: pointer;
  pixelsize: integer;
  thepixel: longint;
begin
  for i := 0 to (Image1.Picture.Height - 1) do
    begin
      row := Image1.Picture.Bitmap.ScanLine[i];
      pixelsize := GetPixelSize(Image1.Picture.Bitmap.PixelFormat);
      pixel := row;
      for j := 0 to (Image1.Picture.Width - 1) do
        begin
          thepixel := Longint(Pixel^);
   //     Memo1.Lines.Add(IntToHex(thepixel, 12));
          Inc(Longint(Pixel), pixelsize);
        end;
     end;
end;