Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];
ВнизНарод ! Найти похожие ветки
← →
PEC (2002-03-28 15:12) [0]Пожалуйста помогите !
Как текстовый файл (например 1.txt) отправить на принтер !
Большое спасибо !
← →
PEC (2002-03-28 15:19) [1]может всетаки кто подскажет
← →
Sava (2002-03-28 15:20) [2]копировать в LPT не пробовал или в PRN
← →
PEC (2002-03-28 15:26) [3]нет не пробовал, но знаю есть функция
← →
Sava (2002-03-28 16:03) [4]Это конечно глючный вариант, в LPT копировать, но помочь может, вообще более грамотно открыть его как текстовый файл, читать из него строки и выводить на печать примерно так: Printer.Canvas.TextOut(0,x,TextSTR);
но тут надо увеличивать x и следить за количеством строк на странице.
← →
Song (2002-03-29 07:39) [5]Да..... :) даёте Вы..
Var ff:TextFile;
....
With TStringList.Create Do
try
LoadFromFile(...);
AssignPrn(ff);
ReWrite(ff);
try
For t:=0 to Count-1 Do WriteLn(ff,Strings[t]);
finally
CloseFile(ff);
end;
finally
Free;
end;
← →
Anatoly Podgoretsky (2002-03-29 11:06) [6]PEC © (28.03.02 15:26)
Функция так и называется CopyFile
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c