Скачать: CL | DM;

Очередь печати.   Найти похожие ветки 

← →
Mishenka   (2004-04-28 23:59) [0]

При печати на принтере в очереди печати в графе имя файла ничего не указано. Как сделать, чтоб выводилось нужное имя файла?

---

← →
Mishenka   (2004-04-30 14:33) [1]

Ау

---

← →
Cobalt ©   (2004-05-01 02:06) [2]

В настройках программы указать - "указывать имя файла"

---

← →
Mishenka   (2004-05-01 18:35) [3]

А про какие настройки идёт речь?

---

← →
Cobalt ©   (2004-05-02 09:17) [4]

А ты о чём?
Вопрос задай конкретно, или ты не программист?

---

← →
Anatoly Podgoretsky ©   (2004-05-02 12:09) [5]

Надо указывать самому

---

← →
Mishenka   (2004-05-03 02:53) [6]

Я понимаю что надо указывать. А как?

---

← →
Cobalt ©   (2004-05-03 10:41) [7]

А это уже смотря как ты печатаешь. Ты же не указал

---

← →
Mishenka   (2004-05-03 13:35) [8]

Программа печатает либо содержимое RichEdit или Image
Вот две подпрограммы:
Для RichEdit:


var Line:Integer;
   PrintText:System.Text;
AssignPrn(PrintText);
Rewrite(PrintText);
for Line:=0 to RichEdit1.Lines.Count-1 do
Writeln(PrintText,RichEdit1.Lines[Line]);
System.Close(PrintText);

для Image:

var K,K1,K2:Real;
   RR:TRect;
with Printer do
begin
    BeginDoc;
    K:=Image1.Picture.Width/Image1.Picture.Height;
    K1:=PageWidth/Image1.Picture.Width;
    K2:=PageHeight/Image1.Picture.Height;
    if K1>K2 then RR:=Rect(0,0,Round(PageHeight*K),PageHeight)
       else RR:=Rect(0,0,PageWidth,Round(PageWidth/K));
    Canvas.StretchDraw(RR,Image1.Picture.Graphic);
    EndDoc;
end;


---

← →
Anatoly Podgoretsky ©   (2004-05-03 13:38) [9]

Свойство Printer, на поиск после указания кода ушло 5 секунд, много меньше чем писать сообщение.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c