Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];

Вниз

Печать на матричный принтер.   Найти похожие ветки 

 
Wolferio ©   (2005-10-10 13:01) [0]

Добрый день!

Как мне розпечатать файл. Строка:

var MyFile:TextFile;

Begin
Assignfile(MyFile,"Lpt1");
Rewrite(Myfile);
Writeln(Myfile, "Text");
end;

Вопрос: как мне вместо Writeln(Myfile, "Text") где выводиться  на принтер слово "Text" сделать так что б печаталься например файл "file.txt"который находиться на диске E:\temp\file.txt.

Спасибо


 
Digitman ©   (2005-10-10 14:33) [1]


> Печать на матричный принтер


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


 
Jay1982 ©   (2005-10-10 14:59) [2]

А-ля копирование файла, только выходящим файлом будет принтер


 
Wolferio ©   (2005-10-10 15:30) [3]


> А-ля копирование файла, только выходящим файлом будет принтер

Но как мне правило прописать строку копирования если строка
Copy(e:\1.txt, prn) не проходит?

Спасибо!


 
Wolferio ©   (2005-10-10 15:30) [4]

Удалено модератором


 
Wolferio ©   (2005-10-10 15:31) [5]

Удалено модератором


 
Digitman ©   (2005-10-10 15:37) [6]

The CopyFile function copies an existing file to a new file.


 
Digitman ©   (2005-10-10 15:38) [7]

Удалено модератором


 
Wolferio ©   (2005-10-10 15:45) [8]


> The CopyFile function copies an existing file to a new file.

я непонимаю.
Как надо правильно написать эту строчку?

Спасибо!


 
Digitman ©   (2005-10-10 15:48) [9]

справку прочитал ?


 
Wolferio ©   (2005-10-10 16:05) [10]

Да спасибо Все получилось!

> Digitman

Я это делал на Порт LPT1. А как мне направить текст на сетевой принтер (тоже матричный)?

я пишу строку ComboBox1.Items.Assign(Printer.Printers);
Тоисть я вывожу все принтера в  ComboBox1, но при какого нибудь принтера оно не печатает. Что делать?

Спасибо!


 
Digitman ©   (2005-10-10 16:12) [11]


> тоже матричный



> А как мне направить текст на сетевой принтер (тоже матричный)?


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


 
Wolferio ©   (2005-10-10 16:23) [12]


> т.е. если бы сетевой но не матричный. а любой другой, то
> вопроса у тебя не возникло бы ? и проблема только в том,
>  что принтер хоть и сетевой, но именно матричный ?
> так что ли ?

Пока идёт речь только о матричном! Печать идет на матричный принтер. (Пока что). А к чему вы ведёте?, имеете в виду что отображаться могут не только матричные принтера!

Но как мне узнать "порт" на сетевой принтер (Пока что матричный)?

ComboBox1.Items.Assign(Printer.Printers) отображает все принтера.

Спасибо!


 
Digitman ©   (2005-10-10 16:57) [13]


> к чему вы ведёте?


к тому что для прикладной программы совершенно безразлично, что там за принтер на самом деле куда-то подключен - то ли матричный, то ли еще какой-то ..

к тому что к LPT м.б. подключен не только матричный принтер, но любой другой ... и от этого прикладной алгоритм печати текст.инф-ции в общем случае никак не изменится ..

к тому что средствами системных настроек можно ассоциировать с любым сетевым принтером любой лок.порт, после чего к сет.принтеру можно будет обращаться обычным образом, т.е. по зарезервированному имени лок.порта, в дан.случае "prn"



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

Форум: "Начинающим";
Текущий архив: 2005.10.30;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.041 c
14-1128777312
SSSQQQ
2005-10-08 17:15
2005.10.30
Как в Delphi можно работать одновременно с двумя проектами


14-1128941924
Oleg_
2005-10-10 14:58
2005.10.30
Delphi 6 на XP home edition


3-1127198715
pasha_golub
2005-09-20 10:45
2005.10.30
TDatasetProvider s stuff


2-1128578979
Wolferio
2005-10-06 10:09
2005.10.30
Сколько папок на розделе


4-1124887364
Tonich
2005-08-24 16:42
2005.10.30
Read/WriteProcessMemory





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский