TPrinter 이용하여 출력할때... 
출력물의 길이를 조절하는 
다음의 소스가 프린터가 1대일때는 되는데, 2대 이상이면 안되는 군요.ㅜㅜ 
고수님들 좀 도와주세요. 
       Printer.GetPrinter(ADevice,ADriver,APort,ADeviceMode); 
       if ADeviceMode <> 0 then 
       begin 
         pDMode := GlobalLock(ADeviceMode); 
         if pDMode <> nil then 
         begin 
           pDMode^.dmFields := pDMode^.dmFields or 
                               DM_PAPERSIZE or 
                               DM_PAPERWIDTH or 
                               DM_PAPERLENGTH; 
           pDMode^.dmPaperSize   := DMPAPER_USER; 
           pDMode^.dmPaperWidth  := 2440;  //단위는 mm 
           pDMode^.dmPaperLength := 2035;  //단위는 mm 
           GlobalUnlock(ADeviceMode); 
         //  Printer.PrinterIndex := Printer.PrinterIndex; 
         end;