powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / FPD for DOS и EPSON LX-1170II
24 сообщений из 24, страница 1 из 1
FPD for DOS и EPSON LX-1170II
    #34777422
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Купили матричник EPSON LX-1170II на замену FX-1050
Необходима печать с DOS-приложения на прямую в порт.
Проблема в следующем:
Шрифт при печати стал больше и докуметы которые печатаются на А4 уходят за пределы листА или на грани.
С 1050 такого не наблюдалось.
Видимо дело в 12cpi и 10cpi у EPSON LX-1170II И FX-1050 соответственно.

Как исправить Ситуацию?
Мож кто сталкивался?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777577
beljran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В старые времена когда ваял на Clippere, такие проблемы решал обычно вставкой в программу Epson совместимых кодов при выводе на печать данных. Их описание должны быть в мануале для принтера Epson, в том числе и ширина печатуемого символа 12 cpi и 10 cpi.
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777597
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Читал о них.
Как это сделатьт в fox-e?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777615
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Кстати, саппорт пишет:
http://support.epson.ru/faq_detail.asp?product=210&id=20

как это должно выглядеть в foxe?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777655
beljran
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Перед выводом на принтер с помощью команд печати @SAY x,y вставляешь управляющие символы для принтера, а затем уже информацию. Примерчик на Clippere прилагая (кодировка DOS)/
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777707
phonixКстати, саппорт пишет:
http://support.epson.ru/faq_detail.asp?product=210&id=20

как это должно выглядеть в foxe?
Если мне не изменяет мой склероз, то надо написать управляющие коды в текст: chr(27) (Это начало эскейп-последовательности) и команду (например, М, как написано по указанной ссылке).

Полное описание команд принтера должно быть в руководстве к принтеру FX-1050.... Принтеры (по командам/драйверам) совместимые - пробовал в свое время...
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777766
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Станислав С...кий
Если мне не изменяет мой склероз, то надо написать управляющие коды в текст: chr(27) (Это начало эскейп-последовательности) и команду (например, М, как написано по указанной ссылке).

Я не программист . мне просто нужно быстро решить проблему.
Куда писать управляющий код?
Я так понял что где-то перед выводом на печать...Типо
SET DEVICE TO PRINTER
SET PRINTER TO LPT1

где-то около этих строчек. Так?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34777882
phonix Станислав С...кий
Если мне не изменяет мой склероз, то надо написать управляющие коды в текст: chr(27) (Это начало эскейп-последовательности) и команду (например, М, как написано по указанной ссылке).

Я не программист . мне просто нужно быстро решить проблему.
Куда писать управляющий код?
Я так понял что где-то перед выводом на печать...Типо
SET DEVICE TO PRINTER
SET PRINTER TO LPT1

где-то около этих строчек. Так?
Если вывод идет прямо на принтер, то например, так:
Код: plaintext
1.
2.
3.
4.
5.
SET DEVICE TO PRINTER
SET PRINTER TO LPT1  
@ prow(),pcol() say chr( 27 )
@ prow(),pcol() say "M"
@ prow(),pcol() say stroka && печатаем строку на принтер

или так

Код: plaintext
1.
2.
3.
4.
5.
SET DEVICE TO PRINTER
SET PRINTER TO LPT1  
?? chr( 27 )
??"M"
? stroka && печатаем строку на принтер

Если через файл, то, например, так:
Код: plaintext
1.
2.
3.
4.
5.
stroka=.... && строка, сформированная для вывода на печать.
stroka=chr( 27 )+"M "+stroka
....&& записываем строку в файл
.......
copy file.txt prn && передаем файл на печать на принтер
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34779709
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
phonixЯ не программист . мне просто нужно быстро решить проблему.
... Если печать идет одним шрифтом без установки из проги, а похоже так и есть - почитай мануал на принтер и установи нужный размер по умолчанию.
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34779807
Dima T phonixЯ не программист . мне просто нужно быстро решить проблему.
... Если печать идет одним шрифтом без установки из проги, а похоже так и есть - почитай мануал на принтер и установи нужный размер по умолчанию.
Ситуации могут быть разными (например, вручную изменили размер или другая программа не восстановила состояние принетра), поэтому лучше в программе установить переход на нужный размер шрифта... Тем более, что кодировать-то всего ничего...
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34780395
-=AlexiS=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В досовские времена помнится были всяческие загрузчики для принтеров.
т.е. проги , которые в зависимости от параметров командной строки устанавливали нужные настройки принтеру.
Может стоит такую поискать и просто вызывать ее перед печатью или перед запуском проги .
В принципе можно просто в файле набрать необходимые ESC - последовательности и сделать
copy файл prn
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34780459
Фотография Vladimir M Sklyar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> Я не программист . мне просто нужно быстро решить проблему.
> Куда писать управляющий код?

А не проще на принтере наклацать кнопками нужный размер шрифта и не мучаться
???
Как это сделано - описано в мануале не принтер.
У мну нету 1170, но есть 2190 и 2180 - принудительно выставлено в 17cpi и
никаких управляющих кодов в программе.

Posted via ActualForum NNTP Server 1.4
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34780640
Давно делал, уже не помню что к чему, приведу просто кусок своего кода для Епсон
Задаю нужный размер шрифта
Код: plaintext
1.
FPUTS(F, CHR( 27 )+CHR( 15 ))&& 10 -норма  15 ,  17 ,  20 (симв/дюйм) строк  60  стандарт  80 -сжатый	
Возвращаю в исходное состояние
Код: plaintext
1.
FPUTS(F, "@ ")
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34781075
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
> А не проще на принтере наклацать кнопками нужный размер шрифта и не мучаться.
Напомню что печать из-под дос.
Может задаваться только тип Шрифта. размер - нет... в данной модели.
печатаем draft-ом.

> В досовские времена помнится были всяческие загрузчики для принтеров.
Не слышал. Знаю о dosprn и Sprint.
Только они не устраивают нас.

И еще:
Документ формируется по строкам из БД.
Поскольку познания невелики..Тут привожу концовку .. там идет ввыод на печать:

КОД ENDDO
IF AT('LPT',ouT)>0
IF ouT='FILE'
IF FILE('AKT.PRN')
DELETE FILE AKT.PRN
ENDIF
SET PRINTER TO C:\PROMO\AKT.PRN
ELSE
SET PRINTER TO &OUT
ENDIF
ELSE
SET PRINTER TO LPT1
IF SYS(13)<>'READY'
SET PRINTER TO LPT2
IF SYS(13)<>'READY'
IF FILE('AKT.PRN')
DELETE FILE AKT.PRN
ENDIF
SET PRINTER TO C:\PROMO\AKT.PRN
@ 6, 4 SAY ;
Принтер не включен. Акт записан в файл C:\PROMO\AKT.PRN!'
ENDIF
ENDIF
ENDIF
SET DEVICE TO PRINTER
SET DEVICE TO SCREEN
SET PRINTER TO LPT1
RELEASE ALL
RETURN


Куда посылать ESC-последовательности?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34781216
phonix
И еще:
Документ формируется по строкам из БД.
Поскольку познания невелики..Тут привожу концовку .. там идет ввыод на печать:

КОД ENDDO
IF AT('LPT',ouT)>0
IF ouT='FILE'
IF FILE('AKT.PRN')
DELETE FILE AKT.PRN
ENDIF
SET PRINTER TO C:\PROMO\AKT.PRN
ELSE
SET PRINTER TO &OUT
ENDIF
ELSE
SET PRINTER TO LPT1
IF SYS(13)<>'READY'
SET PRINTER TO LPT2
IF SYS(13)<>'READY'
IF FILE('AKT.PRN')
DELETE FILE AKT.PRN
ENDIF
SET PRINTER TO C:\PROMO\AKT.PRN
@ 6, 4 SAY ;
Принтер не включен. Акт записан в файл C:\PROMO\AKT.PRN!'
ENDIF
ENDIF
ENDIF
SET DEVICE TO PRINTER
SET DEVICE TO SCREEN
SET PRINTER TO LPT1
RELEASE ALL
RETURN


Куда посылать ESC-последовательности?
ESC-последовательности должны следовать до вывода необходимого фрагмента текста. Т.е., для печати ВСЕГО документа сжатым шрифтом, надо вставить в начало первой строки документа:
Код: plaintext
1.
2.
3.
4.
stroka=.... && строка, сформированная для вывода на печать.
stroka=chr( 27 )+"M "+stroka && добавляем ESC-последовательность в первую строку...
....&& записываем строку в файл/выводим на печать
.......
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34781246
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Станислав С...кий..
У Вас есть ICQ?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34781263
phonixСтанислав С...кий..
У Вас есть ICQ?
Нет, только мыло: станислав1971 на майле.ру
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34781572
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: plaintext
1.
2.
3.
4.
stroka=.... && строка, сформированная для вывода на печать.
stroka=chr( 27 )+"M "+stroka && добавляем ESC-последовательность в первую строку...
....&& записываем строку в файл/выводим на печать
.......
то есть если трок 100 .. ,то подобные процедуры нужно выполнять в каждой?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34781612
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
phonixто есть если трок 100 .. ,то подобные процедуры нужно выполнять в каждой? Нет. Один раз. Получив команду на изменение размера шрифта принтер меняет и помнит до следующей команды меняющей размер или выключения.
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34782086
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
тут сложный вывод документа, для меня во всяком случае.
и он НЕ выводится в текстовый файл.. На прямую в порт..Стоки документа беруться из dbf, например вот так:
rk( 157)= adAtvid
rk( 158)= aoSnovanie
rk( 159)= aoPisanie
rk( 136)= SPACE(10)

и вот мне интересно как и где указать принтеру о том чтобы он печатал в 12 cpi ( esc-последовательность) и при этом не нужно было перелопачивать весь код.
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34783114
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Распакуй куда-нибудь.
Запусти setsize.bat (только принтер включить не забудь) А после печатай как есть.
И будет тебе счастье
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34787130
phonix
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо.
Проблема лишь в том, что при выключении - включении принтера настройки сбиваются.

всетаки нужно средствами fox-a как-то решить.
Помогите?
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34787160
Фотография Redrik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если даже куска кода, выводящего док на принтер, до сих пор нету...
Найди куда и воткни туда вызов батника, который дал Дима Т ...
...
Рейтинг: 0 / 0
FPD for DOS и EPSON LX-1170II
    #34788285
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
phonixвсетаки нужно средствами fox-a как-то решить.
Помогите? Как? Чтобы что-то в код добавить надо код хотя бы увидеть. Если добавить в то что ты показывал (это похоже на выбор куда выводить, только коряво как-то написано) то
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
ENDDO
IF AT('LPT',ouT)> 0 
	IF ouT='FILE'
		IF FILE('AKT.PRN')
			DELETE FILE AKT.PRN
		ENDIF
		SET PRINTER TO C:\PROMO\AKT.PRN
	ELSE
		SET PRINTER TO &OUT
	ENDIF
ELSE
	SET PRINTER TO LPT1
	IF SYS( 13 )<>'READY'
		SET PRINTER TO LPT2
		IF SYS( 13 )<>'READY'
			IF FILE('AKT.PRN')
				DELETE FILE AKT.PRN
			ENDIF
			SET PRINTER TO C:\PROMO\AKT.PRN
			@  6 ,  4  SAY 'Принтер не включен. Акт записан в файл C:\PROMO\AKT.PRN!'
		ENDIF
	ENDIF
ENDIF
****************** думаю сюда **********************
?? chr( 27 ) + "M" 
****************************************
SET DEVICE TO PRINTER
SET DEVICE TO SCREEN
SET PRINTER TO LPT1
RELEASE ALL
****************** или сюда **********************
?? chr( 27 ) + "M" 
****************************************
RETURN
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / FPD for DOS и EPSON LX-1170II
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]