вывод на печать в паскале - Помощь студентам

ZeRro · 27.04.2009, 19:39

вывод на печать в паскале стандартным uses Printer не выходит((( помогите))

Fellics{новичок} · 27.04.2009, 19:57

А разве в паскале возможно выводить на печать?

Sazary · 27.04.2009, 20:07

Если принтер подключен к LPT, то, вроде, можно.
С упомянутым выше модулем Printer:

Код:

writeln(lst,'test');

А вот с USB нельзя. По крайней мере напрямую.

ZeRro · 27.04.2009, 20:14

да вот как раз два принтера один лазерный(LPT) второй струйный(USB) печатать не могу. по моему printer чисто для матричных принтеров ??? или нет?

Sazary · 27.04.2009, 20:17

Цитата:

по моему printer чисто для матричных принтеров ??? или нет?

Насколько я знаю, ему все равно. Ведь программа посылает данные на порт, а не на сам принтер.

Вообще, никогда не пользовался этим модулем. Поэтому точно сказать не могу.

ZeRro · 27.04.2009, 20:22

ясно ... с паскалем не светит )) а в делфи есть какие то модули для той же операции?? напишите если не сложно самую простую)) и чтобы я понял азы) заранее спс !!!

Sazary · 27.04.2009, 20:32

Подключаете модуль Printers.
Там есть переменная Printer : TPrinter

Вот с помощью нее выводите:

Код:

Procedure TForm1.Button1Click(Sender: TObject);
Begin
With Printer do Begin
BeginDoc;
Canvas.TextOut(100,100,'ТЕСТ');
EndDoc;
end;
end;

ZeRro · 27.04.2009, 20:54

ОГРОМНОЕ СПАСИБО!

worshewitin · 28.04.2009, 21:42

Sazary помоги пожалуйста. В окне формы записывается строка текста. удалите в строке все одинаковые символы. нужно определить длинну строки, проверить символы строки на совпадение с проверяемым символом, при совпадении символов удалить лишний символ, уменьшить длинну строки при удалении очередного символа.

Solveig · 28.04.2009, 23:49

А не легче в Ворд скопировать и распечатать?))

27.04.2009, 19:39	#1
ZeRro Регистрация: 27.04.2009 Сообщений: 6	вывод на печать в паскале вывод на печать в паскале стандартным uses Printer не выходит((( помогите))

27.04.2009, 20:07	#3
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	Если принтер подключен к LPT, то, вроде, можно. С упомянутым выше модулем Printer: Код: `writeln(lst,'test');` А вот с USB нельзя. По крайней мере напрямую. Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

27.04.2009, 20:32	#7
Sazary В тени Старожил Регистрация: 19.12.2008 Сообщений: 5,788	Подключаете модуль Printers. Там есть переменная Printer : TPrinter Вот с помощью нее выводите: Код: `Procedure TForm1.Button1Click(Sender: TObject); Begin With Printer do Begin BeginDoc; Canvas.TextOut(100,100,'ТЕСТ'); EndDoc; end; end;` Вполне очевидно, чтобы что-то понять, необходимо книги читать. Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем. ___________________________________ ___________________________________ _______ [=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Вывод рисунка на печать	-=<[Evklidd]>=-	Мультимедиа в Delphi	10	09.07.2010 18:38
вывод а печать в паскале	ZeRro	Помощь студентам	0	27.04.2009 19:38
Вывод на печать	sali_s	Microsoft Office Excel	2	04.06.2008 12:05
Вывод на печать	-=<[Evklidd]>=-	Общие вопросы Delphi	6	22.02.2008 19:56
вывод на печать asembler	udjal	Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM	0	10.11.2007 14:32

27.04.2009, 19:57	#2
Fellics{новичок} Форумчанин Регистрация: 25.03.2008 Сообщений: 159	А разве в паскале возможно выводить на печать?

27.04.2009, 20:14	#4
ZeRro Регистрация: 27.04.2009 Сообщений: 6	да вот как раз два принтера один лазерный(LPT) второй струйный(USB) печатать не могу. по моему printer чисто для матричных принтеров ??? или нет?

27.04.2009, 20:22	#6
ZeRro Регистрация: 27.04.2009 Сообщений: 6	ясно ... с паскалем не светит )) а в делфи есть какие то модули для той же операции?? напишите если не сложно самую простую)) и чтобы я понял азы) заранее спс !!!

27.04.2009, 20:54	#8
ZeRro Регистрация: 27.04.2009 Сообщений: 6	ОГРОМНОЕ СПАСИБО!

28.04.2009, 21:42	#9
worshewitin Пользователь Регистрация: 25.04.2009 Сообщений: 11	Sazary помоги пожалуйста. В окне формы записывается строка текста. удалите в строке все одинаковые символы. нужно определить длинну строки, проверить символы строки на совпадение с проверяемым символом, при совпадении символов удалить лишний символ, уменьшить длинну строки при удалении очередного символа.

28.04.2009, 23:49	#10
Solveig Регистрация: 20.04.2009 Сообщений: 3	А не легче в Ворд скопировать и распечатать?))