델마당에 질문을 두번이나 했지만 아무도 답변해 주는 사람이 없어서.. 이렇게 이곳을 찾게 되었습니다.
TBitmap을 래핑하는 클래스를 제작중입니다. 클래스 이름은 TDIB 인데요
Page, BmpFile : TDIB; 라고 선언하면
BmpFile.Draw(Page, 0, 0); 이런식으로
드로잉 할 수 있습니다.
그런데 생성자에서 안에 있는 TBitmap 객체를 Create 함에도 불구하고 ScanLine을 이용한 Draw 함수에서 억세스 바이올레이션이 납니다. 둘다 BMP 파일을 로드하면 괜찮구요. 아마 ScanLine이 세팅이 안되거나 메모리가 할당이 안된 것 같은데요..
TBitmap.Create 한 다음에 어떤 작업을 해 주어야 포인터를 사용할 수 있을까요?
| #121-1. 전봉훈 |
2005/07/20 (Wed) |
추가사항
참고로 Image 컴포넌트 위에 그리는 Draw함수도 있는데 똑같은 구조임에도 그것은 잘 됩니다.
|
| #121-2. 안영기 |
2005/07/21 (Thu) |
var
bitmap: TDIB;
pDest32: ^DWORD;
i, j: integer;
begin
bitmap := TDIB.Create();
bitmap.Width := 100;
bitmap.Height := 100;
bitmap.PixelFormat := pf32bit;
bitmap.Canvas.FillRect(bitmap.Canvas.ClipRect);
for j := 0 to pred(bitmap.Height) do begin
pDest32 := bitmap.ScanLine[j];
for i := 0 to pred(bitmap.Width) do begin
pDest32^ := $FF0000;
inc(pDest32);
end;
end;
Canvas.Draw(0, 0, bitmap);
bitmap.Free();
end;
이런 식으로 출력하려했을 때 문제가 생긴다면 뭔가 TDIB에 문제가 있는 것입니다. 그리고 TDIB의 구현에 문제가 있는 경우에는 구현한 소스가 없으면 원인을 알지 못합니다.
(위의 결과로는 window의 (0,0)부터 (100,100)까지 빨간 사각형이 나타납니다.)
일단 TDIB를 구현할 때 inherited를 빼먹은 부분이 있는지 확인하고 그 부분에 문제가 없을 때는 소스를 직접 올려 주세요.
|
|