새로운 글
새로운 덧글

DBMS의 Blob 컬럼의 이미지 데이터를 퀵레포트 보고서에 출력하는 내용입니다.

 

쿽레포트에 사진을 출력하려면 TQRImage, TQRDBImage 2개의 컴포넌트를 이용할 수 있습니다.

(TQRDBImage는 비트맵 데이터만 출력할 수 있습니다.)

 

저는 JPEG, GIF, PNG 등을 지원하기 위해 TQRImage를 이용합니다.

 

아래 델파이 샘플은 BOOK_THUMB(Blob 컬럼)의 데이터를 읽어 TQRImage에 표시하는 내용입니다.

Blob 컬럼을 읽기 위해 TBlobField를 사용하고, TWICImage를 이용해 다양한 포맷을 지원합니다.

(BLOB 컬럼에서 (이미지 등의)데이터 읽고 쓰기: http://blog.hjf.pe.kr/437)

 

레코드 별로 이미지를 표시하기 위해 TFDQuery의 AfterScroll 이벤트에 이미지 불러오는 코드를 작성합니다.

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

  private

    { Private declarations }

    FWicImage: TWICImage;

    FMemoryStream: TMemoryStream;

  public

    { Public declarations }

  end;

... 중략 ...

 

procedure TForm1.FormCreate(Sender: TObject);

begin

  FWicImage := TWICImage.Create;

  FMemoryStream := TMemoryStream.Create;

end;

 

procedure TForm1.FormDestroy(Sender: TObject);

begin

  FWicImage.Free;

  FMemoryStream.Free;

end;

 

procedure TForm1.FDQuery1AfterScroll(DataSet: TDataSet);

begin

  FMemoryStream.Clear;

  (FDQuery1.FieldByName('BOOK_THUMB') as TBlobField).SaveToStream(FMemoryStream);

  if FMemoryStream.Size = 0 then

    Exit;

  FWicImage.LoadFromStream(FMemoryStream);

  QRImage1.Picture.Assign(FWicImage);

end;

 

아래와 같이 보고서에 이미지를 출력할 수 있습니다.

번호 제목 글쓴이 날짜 조회 수
공지 [데브기어 컨설팅] 모바일 앱 & 업그레이드 마이그레이션 관리자 2017.02.06 1117
공지 이 달의 기술자료 & 기술레터 관리자 2017.02.06 361
공지 데브기어 강의 - 2017년 11월~2017년 12월 관리자 2015.01.22 5652
공지 RAD Studio(Delphi, C++Builder) 시작하기 관리자 2015.06.30 9042
공지 RAD 스튜디오로 개발된 모바일 앱 사례(17년 6월 26일 업데이트) 험프리 2014.01.16 146543
643 윈도우 10 Anniversary 업데이트와 RAD Studio file 관리자 2016.09.09 531
642 RAD 스튜디오(델파이, C++빌더) 웹개발 방법(WebBroker, IntraWeb) 험프리 2016.09.07 504
641 TeeChart 컴포넌트를 통해 다양한 차트 및 그래프로 데이터를 출력할 수 있습니다. file 험프리 2016.08.30 1007
640 [발표자료] 20160830 나만의 C++애플리케이션 완성하기 with C++빌더 험프리 2016.08.26 1102
639 이 달의 기술자료 - 2016년 09월 file 험프리 2016.08.25 305
638 [마이그레이션 사례] 감리교신학대학교 험프리 2016.08.25 504
637 인터베이스(Interbase) 에디션 안내 file 험프리 2016.08.25 477
636 [로드맵] RAD 스튜디오 로드맵(2016년 8월) file 험프리 2016.08.12 1613
635 FireDAC 성능 비교(BDE, dbGO(ADO), dbExpress, FireDAC) file 험프리 2016.08.09 652
» 퀵레포트(Quick Report)에 사진 출력하기 험프리 2016.08.01 676
633 BLOB 컬럼에 (이미지 등의)데이터 읽고 쓰기 험프리 2016.08.01 595
632 퀵레포트 보고서 엑셀로 내보내기(저장하기) [1] 험프리 2016.08.01 495
631 이 달의 기술자료 - 2016년 08월 file 험프리 2016.07.28 276
630 [마이그레이션] 써드파티 컴포넌트 마이그레이션 방안 안내 험프리 2016.07.26 603
629 1차 공개 중고생 강의용 앱 소스 및 메뉴얼입니다. file 쭈니아빠 2016.07.16 375
628 이 달의 기술자료 - 2016년 07월 file 험프리 2016.06.30 1767
627 [발표자료] 20160624 소개합니다, RAD서버 관리자 2016.06.27 441
626 [추가된 문법 정리] - 배열 상수 초기화:델파이 XE7 추가 관리자 2016.06.03 1138
625 [추가된 문법 정리] - 클래스 메소드(Class Method):델파이 2007 추가 관리자 2016.06.03 304
624 [추가된 문법 정리] - 클래스 필드(Class Field):델파이 2007 추가 관리자 2016.06.03 250


광고 모듈이 설치되어 있지 않아 실행을 중단합니다..