2 Fragen zu Bitmap

Um in Delphi eine Schwarz-Weiß-Bitmap zu invertieren, kannst du die Pixel der Bitmap durchlaufen und die Farben umkehren. Hier ist ein einfaches Beispiel, wie du das machen kannst: ```delphi procedure InvertBitmap(Bitmap: TBitmap); var x, y: Integer; PixelColor: TColor; begin Bitmap.PixelFormat := pf1bit; // Stelle sicher, dass die Bitmap im 1-Bit-Format ist for y := 0 to Bitmap.Height - 1 do begin for x := 0 to Bitmap.Width - 1 do begin PixelColor := Bitmap.Canvas.Pixels[x, y]; // Invertiere die Farbe: Schwarz wird Weiß und umgekehrt if PixelColor = clBlack then Bitmap.Canvas.Pixels[x, y] := clWhite else Bitmap.Canvas.Pixels[x, y] := clBlack; end; end; end; ``` In diesem Beispiel wird die Bitmap durchlaufen, und jeder Pixel wird überprüft. Wenn der Pixel schwarz ist, wird er auf weiß gesetzt und umgekehrt. Stelle sicher, dass die Bitmap im richtigen Format vorliegt, um die Pixel korrekt zu bearbeiten.

Um in Delphi alle nicht-weißen Pixel einer Bitmap ohne pixelweise Abfrage schwarz zu zeichnen, kannst du die Bitmap-Daten direkt im Speicher bearbeiten. Hier ist ein Beispiel, wie du das erreichen kannst: 1. Lade die Bitmap in ein `TBitmap`-Objekt. 2. Greife auf die Pixel-Daten über die `Scanline`-Eigenschaft zu. 3. Setze die nicht-weißen Pixel auf schwarz. Hier ist ein Beispielcode: ```delphi uses Vcl.Graphics, Vcl.Imaging.pngimage; procedure SetNonWhitePixelsToBlack(Bitmap: TBitmap); var x, y: Integer; Row: PByteArray; Color: TColor; begin Bitmap.PixelFormat := pf32bit; // Setze das Pixel-Format auf 32-Bit for y := 0 to Bitmap.Height - 1 do begin Row := Bitmap.Scanline[y]; for x := 0 to Bitmap.Width - 1 do begin Color := TColor(Row[x * 4] or (Row[x * 4 + 1] shl 8) or (Row[x * 4 + 2] shl 16)); // Überprüfe, ob der Pixel nicht weiß ist if (Color <> clWhite) then begin Row[x * 4] := 0; // Blau auf 0 Row[x * 4 + 1] := 0; // Grün auf 0 Row[x * 4 + 2] := 0; // Rot auf 0 end; end; end; end; ``` In diesem Beispiel wird die Bitmap auf das 32-Bit-Pixel-Format gesetzt, und dann wird jeder Pixel überprüft. Wenn der Pixel nicht weiß ist, wird er auf schwarz gesetzt. Achte darauf, dass du die Bitmap vorher korrekt lädst und dass sie im richtigen Format vorliegt.