새로운 글
새로운 덧글

(해당 내용은 모든 데이터셋(TDataSet을 상속받은 컴포넌트) 즉, FireDAC, dbExpress, dbGo(ADO) 등에 적용할 수 있습니다.)

 

대부분의 DBMS에서 Blob(Binary Large object) 타입의 컬럼을 만들 수 있습니다. 이 컬럼에는 이미지등의 큰 바이너리 데이터를 취급할 수 있습니다.

 

아래 코드는 Blob 컬럼에서 이미지를 읽고, 쓰는 델파이 예제입니다.

 

Blob 컬럼에 이미지 데이트 쓰기

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

var

  wic: TWICImage; // Microsoft Windows Imaging Component

  Stream: TMemoryStream;

begin

  wic := TWICImage.Create;
  Stream := TMemoryStream.Create;

  try

    wic.Assign(AImage.Picture);
    wic.SaveToStream(Stream);

    qryPhoto.Edit; // 데이터셋 수정

    (qryPhoto.FieldByName('PHOTO_PHOTO') as TBlobField).LoadFromStream(Stream);

    qryPhoto.Post;

  finally

    Stream.Free;

    wic.Free;
  end;

end;

 

Blob 컬럼에서 이미지 데이터 읽기

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

var

  wic: TWICImage; // Microsoft Windows Imaging Component

  Stream: TMemoryStream;

begin

  Stream := TMemoryStream.Create;

  wic := TWICImage.Create;

  try

    (qryPhoto.FieldByName('PHOTO_FIELD') as TBlobField).SaveToStream(Stream);

    if Stream.Size > 0 then

    begin

      try

        wic.LoadFromStream(Stream);

        Image1.Picture.Assign(wic);

      except

      end;

    end;

  finally

    Stream.Free;

    wic.Free;

  end;

end;

 

위에서 사용한 TWICImage는 Microsoft Windows Imaging Component를 캡슐화한 클래스로, 다양한 이미지 형식(Bitmap, JPEG, PNG, GIF, TIFF 등)을 로드할 수 있는 컨테이너 입니다.(http://docwiki.embarcadero.com/Libraries/en/Vcl.Graphics.TWICImage)

번호 제목 글쓴이 날짜 조회 수
공지 RAD스튜디오(델파이,C++빌더) - 고객 사례 목록 관리자 2018.10.23 1194
공지 [데브기어 컨설팅] 모바일 앱 & 업그레이드 마이그레이션 [1] 관리자 2017.02.06 4469
공지 [전체 목록] 이 달의 기술자료 & 기술레터 관리자 2017.02.06 996
공지 [프로그래밍 강의] 2019.4~2019.7 관리자 2015.01.22 7823
공지 RAD스튜디오(델파이, C++빌더) - 시작하기 관리자 2015.06.30 13353
공지 RAD스튜디오(델파이,C++빌더) - 모바일 앱 개발 사례 (2019년 5월 업데이트 됨) 험프리 2014.01.16 150226
» BLOB 컬럼에 (이미지 등의)데이터 읽고 쓰기 험프리 2016.08.01 1638
166 1차 공개 중고생 강의용 앱 소스 및 메뉴얼입니다. file 쭈니아빠 2016.07.16 502
165 [추가된 문법 정리] - 배열 상수 초기화:델파이 XE7 추가 관리자 2016.06.03 1997
164 [추가된 문법 정리] - 클래스 필드(Class Field):델파이 2007 추가 관리자 2016.06.03 440
163 브레이크 포인트를 설정해도 디버깅이 안되는 경우 살펴볼 항목 file 험프리 2016.05.13 1296
162 OutputDebugString 함수로 디버그로그를 출력할 수 있습니다. file 험프리 2016.02.16 1666
161 [안드로이드] 배포파일, 아이콘, 스플래쉬 등이 잘 배포되었는지 확인하기 file 험프리 2015.11.11 942
160 [다시보기] RAD Studio 10 시애틀 딥다이브 세션 다시보기(영문) Humphery 2015.10.02 412
159 [마이그레이션] 함수(또는 변수)에 빨간밑줄이 가고 컴파일 시 Undeclared Identifier 오류 시 조치방법 file 험프리 2015.09.30 927
158 델파이 문서화 도구 참고링크 Humphery 2015.09.11 703
157 [하이브리드 앱 개발] 웹페이지에서 델파이 함수 호출하기 Humphery 2015.06.26 2378
156 안드로이드 웹브라우저에서 "tel:, sms:" 링크가 동작하지 않는 이슈 해결하기 Humphery 2015.06.26 2328
155 [윈도우10] 델파이로 윈도우10 알림 표시하기(WinRT API 이용) Humphery 2015.06.24 1487
154 파이어닥(FireDAC)으로 IBLite 연결 시 "unavaliable database." 오류 발생에 대한 대응 file Humphery 2015.05.15 588
153 델파이에서 MSOffice 엑셀과 워드 연동 참고자료. [1] Humphery 2015.04.27 2840
152 [델파이7 이후 새로운 기능][XE2~] 프로젝트 매니저에서 타겟플랫폼을 64-bit Windows로 선택 해 64비트 애플리케이션을 개발할 수 있습니다. file Humphery 2015.04.23 1327
151 [델파이7 이후 새로운 기능] 추가되고 개선된 VCL 컴포넌트 Humphery 2015.04.22 2446
150 [델파이7 이후 새로운 기능] 코딩 생산성을 높여주는 코드에디터 기능들 Humphery 2015.04.21 1950
149 XE8로 구현한 멀티플랫폼 클립보드 공유앱 런칭 file c2design 2015.04.19 1037
148 Thalmic Labs의 MYO Armband Delphi SDK Beta7입니다. 쭈니아빠 2015.04.18 825


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