Image Canvas Pixel in Memo

[Medium]

Anmerkungen, die das Problem wahrscheinlich nicht betreffen, aber dennoch erwähnenswert sind:
- Lass die Schleifen bis Image1.Width-1 (gleiches bei Height) laufen. Im Moment rauscht du immer einen Pixel zu weit.
- Die Wursterei mit Hex ist überflüssig. t := chr(B); mehr brauchst du nicht. Als Einzeiler: "s := s + chr(GetBValue(Image1.Canvas.Pixels[X, Y]));"

Was das Problem selbst angeht, so würde es helfen, wenn du dir die Zahlenwerte von B mal testweise mit ausgeben lässt. 'ÿ' ist wenn ich nicht irre #254 oder #255. Wenn B andere Werte hat, liegts vermutlich doch irgendwie an der Hex-Fummelei, wobei ich um die Uhrzeit auf den ersten Blick nicht erkenne warum (mal aussen vor gelassen, dass es unnötig ist).

Auch würde mich das zugrunde liegende Bild mal interessieren!