이미지 파일의 파일명을 메모에 저장한후에
연속해서 출력하는 프로그램을 작성중입니다.
미리보기로 확인하면 모든 이미지가 정상적으로
출력되는걸 확인 할수 있는데 막상 출력을 하면
안나오는 페이지가 나오는 페이지 보다 많습니다.
어떻게 해결해결해야 하나요??
for i := 0 to Memo1.lines.Count-1 do
begin
PicF := trim(Memo1.lines[i]) + '.JPG';
if fileexists(PicF) then
begin
Form2.QRImage1.Picture.LoadFromFile(PicF);
Form2.QuickRep1.Print;
end;
end;