Felicitaciones a Domingo Seoane por sus primeros 1.000 mensajes

[Neftali [Germán.Estévez]]

¡¡¡Muchas Felicidades[size=4][color=Red] Seoane!!!
[size=2][color=Black]
Por los mensajes, por el código y por la calidad de ambos.

Por cierto, la misma función, pero para bitmaps (B/N), no funciona mal...

Código Delphi [-]
function BitmapToStr(ABitmap: TBitmap): string;
var
  i,j: integer;
begin
  Result:= '';

  for j:= 0 to ABitmap.Height - 1 do
  begin
    for i:= 0 to ABitmap.Width - 1 do
      if ABitmap.Canvas.Pixels[i,j] = $FFFFFF then
        Result:= Result + '_'
      else
        Result:= Result + 'X';
    Result:= Result + #13#10;
  end;
end;

Código Delphi [-]
____________________________________________________________________________
____________________________________________________________________________
______________________________________________________X_____________________
_____________________XXX_______________X____________XXXXX___________________
_____________________XXXX____________XXX___________XXXXXX___________________
___________________XXXXXX____________XXXXX_______XXX__XXX___________________
___________________XXX__XXX__________XX_XX_______XXX__XXX___________________
___________________XXX__XXX_________X___XX_______XX___XXX___________________
___________________XXX__XXX_________X__XXX_______XX___X_____________________
_____________________X______________XXX__________XX_XX______________________
_____________________XXX____________XXXX________XXXXXX______________________
______________________XXXXXX________XXXXXX______XXXXXX______________________
______________________XXXXXX________X___XX____XXX__XXX______________________
______________________XXX__XXX______X___XX____XXX__X________________________
______________________XXX__XXX______X___XX____XX___X________________________
______________________XXX___XX____XXX___XX____XX_XXX________________________
________________________X___XX____XXX___XX___XXXXXXXXXXXX___________________
_____________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX___________________
__________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX______XX_____________
______________________XXXXXXXXXXXXXXXXXXXXXXXXXXX____________XXXXX__________
_____________XXX_______________________________________________XXXX_________
____________XXXX_______________________________________________XXXX_________
__________XXXXX_______________________________________XXX___XXXXXXX_________
__________XXX_________XXXXX_________XXXXXXXXX_______XXXXXX__XXXXXX__________
__________XXX______XXXXXXXX______XXXXXXXXXXXXXXXXXXXXXXXX____XXX____________
__________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX_____________________
____________XXXXXXX_____XXXXXXXXXXXXX_____XXXXXXXXXX________________________
________________XX_______XXXXXXXXXXX_________________________XX_____________
________________XXX_________________________________________XXX_____________
________________XXXXXXXXX___________________________________X_______________
________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX____________XXX_______________
________________XXX_____XXXXXXXXXXXXX_____________________XXX_______________
________________XXXXX_____________________________________XXX_______________
________________XXXXX_____________________________________XXX_______________
________________XXXXXXXXXXXX______________________________XXX_______________
________________XXXXXXXXXXXXXXXXXXXXXXX___________________XXX_______________
________________XXXXX_____________________________________XXX_______________
________________XXXXX_____________________________________XXX_______________
_______________XXXXXXX______________________________________XXX_____________
_______________XXXXXXXXXXXXXXX________________XXXXXXXXX_____XXXX____________
__________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX_______XXX____________
____________XXX____________XXXXXXXXXXXXXXXXXXX_______________XXX____________
____________XXX______________________________________________XXX____________
____________XXX______________________________________________XXX____________
____________XXXXXXX___________________________________XXXXXX_XXX____________
____________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX________________
__________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX_____________________
____________________________________________________________________________
____________________________________________________________________________
____________________________________________________________________________
____________________________________________________________________________