자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Firemonkey MemoryStream 문의입니다

2015.09.08 09:39

최민철 조회 수:701

IdFTP를 이용하여 서버에 파일전송을위해 이미지를 가지고 테스트를 하고있는데

파일 용량이 증가하는 상황이 발생하여 소스를 살펴보니

MemoryStream으로 변환시 이미지의 비트가 변동되는 상황이 발생합니다


예를들어 24비트의 이미지가 32비트로 변경되어
3MB정도 되는 이미지가 15MB로 증가합니다.


코드는 간단합니다.

Image컴포넌트에 이미지를 넣어놓고


var
  Strame : TMemoryStream;

begin

  Strame := TMemoryStream.Create;

  Image1.Bitmap.SaveToStream(Stream);

  Strame.Position := 0;

  Strame.SaveToFile('C:\test123.jpg');

end;



Stream으로 변환시 비트수준을 지정할수 있을까요?

아니면 원본 그대로 하는 방법이 있을까요?


24비트수준인 이미지 첨부해 드리겠습니다.

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 20072
공지 유용한 관련 사이트 관리자2 2014.03.20 58976
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 102603
2319 [IoT 세미나] 비콘에 대해 알고 싶습니다. Humphery 2015.09.04 108
2318 [IoT 세미나] 블루투스에 대해 알고 싶습니다. Humphery 2015.09.04 131
2317 [IoT 세미나] 세미나 내용은 좋았는데 실습을 해보지 못해 아쉬워요. Humphery 2015.09.04 79
2316 XE8 모바일 프레임전환시 애니메이션 효과 [4] 가을이다 2015.09.04 302
2315 C/S 시스템을 위한 모바일 개발 DataSnap이 좋은지 REST 웹서비스 가 좋은지? [3] 미스터몽키 2015.09.04 548
2314 TFloatAnimation 효과 문의 [2] 가을이다 2015.09.05 240
» MemoryStream 문의입니다 [2] file 최민철 2015.09.08 701
2312 ibxpress200 [1] secret 김상훈 2015.09.09 4
2311 ListBox 사용중 문의 드립니다. [2] file 오광 2015.09.09 168
2310 다국어 지원 관련 XE6 update1 오류 발생 문의 [1] file spirng 2015.09.09 114
2309 [무료 온라인 세미나] 새로운 RAD Studio 10 시애틀: 윈도우 10 혜택을 누리세요! 관리자 2015.09.11 175
2308 [시애틀 출시세미나] 함수,프로시저 상단 또는 유닛파일 헤더에 주석을 자동추가할 수 있는 방법이 있나요? Humphery 2015.09.11 149
2307 [시애틀 출시세미나] FireDAC의 기능을 자세히 살펴보고 싶어요. Humphery 2015.09.11 105
2306 [시애틀 출시세미나] FireDAC으로 MongoDB 연결하는 내용을 안내해 주세요. Humphery 2015.09.11 144
2305 [시애틀 출시세미나] Uses절에 없는 유닛의 함수를 사용하면 구문오류가 나는데요. 자동으로 Uses절에 추가할 수 없나요? Humphery 2015.09.11 241
2304 [시애틀 출시세미나] 제품소개의 권장사항에 XP가 빠져있는데 XP에서도 사용할 수 있나요? Humphery 2015.09.11 113
2303 [시애틀 출시세미나] 안드로이드 서비스를 기기를 재시동할때 자동으로 시작시킬 수 있나요? Humphery 2015.09.11 127
2302 [시애틀 출시세미나] 최근 나온 델파이 기술서적(문법과 컴포넌트 소개)을 알려주세요. Humphery 2015.09.11 266
2301 [시애틀 출시세미나] 델파이 IDE 메뉴 가이드북은 없나요? Humphery 2015.09.11 141
2300 [시애틀 출시세미나] 세미나 내용을 녹화해서 동영상으로 제공해 주세요. Humphery 2015.09.11 280