Bilder in einen Delphi5 Quellcode umwandeln?

[BrainCode]

Du kannst - rein theoretisch - ein Programm schreiben, was für jeden Bildpunkt der Bitmap eine Delphi-Code-Zeile nach dem Schema
canvas.pixels[x,y] := Farbe erstellen. Aus einem Bild mit zwei schwarzen Pixeln in einer und zwei weißen in der nächsten Zeile würde so was rauskommen:

Delphi-Quellcode:

canvas.pixels[0,0] := #000000;
canvas.pixels[1,0] := #000000;
canvas.pixels[0,1] := #FFFFFF;
canvas.pixels[1,1] := #FFFFFF;

Ist allerdings ziemlich schwachsinnig