ShellExcute를 사용하는 건 좋은 해결책이 아닌 것 같습니다.

printer.Canvas.Draw(0,0,Image1.Picture.Graphic);

이걸 쓰셨다고 하는데, 출력부분의 코딩을 전체로 올려주셔야 문제점을 알 수 있을 듯 합니다.

기본적으로 비트맵을 프린트 할 경우, 스풀 사이즈는 비트맵의 파일 사이즈와 일치해야 합니다.

2.2메가 짜리 비트맵이면 스풀도 2.2메가라는 것이죠.

코딩 상의 오류일 가능성이 아주 높다고 생각됩니다.

또한 Draw보다는 CopyRect등의 방식을 쓰셔야 원하는 대로 출력하실 수 있을 겁니다.

답변 감사합니다.

제가 쓰는 이미지 확장명이 bmp 가 아니라 jpg라서 그런 것 같습니다.

용량이 확 늘어나는 이유가요.

제가 쓴 방법은 Image1 에 출력하려는 이미지를 하나 올려놓은 후에,

printer.BeginDoc;
printer.Canvas.Draw(0,0,Image1.Picture.Graphic);
printer.EndDoc;

이 방법 하나와,

퀵 레포트를 하나 생성하여, QRImage 위에 이미지를 얹어서 출력하는

    try
         frm_imprint := Tfrm_imprint.Create(Application);
         frm_imprint.QRImage1.Picture.LoadFromFile('c:\imsi.jpg');
         frm_imprint.QuickRep1.Print;
    except
         frm_imprint.Free;
         showmessage(' 출력 도중 에러 발생 ');
         exit;
    end;

두 가지 방법 다 프린터시 용량이 엄청 커지는 바람에 사용못했습니다.

님의 말대로 CopyRect 을 한번 사용해보려고 합니다.
답변 감사드립니다. ^^

간단하게 구현해봤으니 참고해보세요.

친절하게 소스까지.. 정말 감사합니다. ^^*

주신  샘플코드로 실행해봤는데, 여전히 출력할 때 이미지 사이즈 늘어나는건 똑같네요.

이건 어쩔 수가 없나 봅니다.

아래 첨부화일로 출력해보면, 스풀링이 2.6M 가 나옵니다.

실제 화일크기는 63k 인데...

그러니, 3~4M 되는 것들은 32M 씩 스풀링이 잡히네요. 휴~

며칠을 검색하고, 여쭤보고, 궁리해보고...

꼭 써야 하는 프로그램이기에, 포기하지도 못하고 이러고 있네요.

Shellexecute 를 써서, 알아서 윈도우 프로그램에서 알씨를 쓰던 Windows viewer 를 쓰던

출력하라고 해야 할까봐요. ㅡ.ㅜ

같이 고민해주셔서 감사합니다~~

프린터 드라이버 설정 문제로 보입니다.
최신 드라이버인지, 프린터 설정은 어떻게 되어 있는지 확인해보세요.

또, 기본 프린터를 Microsoft Office Document Image Writer 로 잡고 테스트 해보시구요.