Win 7 x64
Lazarus 1.1
FPC 2.7.1에서는 되네요...
무슨 차이가 있는지는 모르겠지만요...

속도는 많이 느려서 사용하기는 좀 그렇네요

사족으로,
   i:=1, j:=1 을 i:0, j:=0 으로 해야 다 복사가되는군요

procedure TForm1.Button1Click(Sender: TObject);
var
  i, j: integer;
begin

  for i:=0 to image1.Width-1 do begin
    for j:=0 to image1.Height-1 do begin
      image2.Canvas.Pixels[i, j]:=  image1.Canvas.Pixels[i, j];
    end;
  end;

  showMessage('Good~ !');

//  image2.Refresh;
end;