Image.Picture.Bitmap.Canvas 요걸로 접근하지 않아서 그런게 아닐련지요?
제갈볼 님이 쓰신 글 :
: 라자루스에서 Pixels[] 메써드 안먹나요?
:
: 다음 코드가 반응이 없네요 ... 원래 이미지1에서 이미지2로
: 그림이 복사되어야 하거든요 ... 그런데 그림이 안변해요 ..
: 왜 이런건가효 ??
: -------------------------------------
:
: procedure TForm1.Button1Click(Sender: TObject);
: var
: i, j: integer;
: begin
:
: for i:=1 to image1.Width-1 do begin
: for j:=1 to image1.Height-1 do begin
: image2.Canvas.Pixels[i, j]:= image1.Canvas.Pixels[i, j];
: end;
: end;
:
: showMessage('Good~ !');
:
: image2.Refresh;
:
: end;
:
: -----------------------------------
:
: MacOSX 10.7.4 입니다.
: Lazarus 1.0
: FPC 2.6.0 입니다.
|