txt in Win to Dos | |
---|---|
GoshaS |
В кратце: В таблицу из левого приложения экспортируется текстарь, после обработки, опять же возвращает тексарь с группировками и пр., в общем отчет. Все эти заморочки, для печати из под DOS-а ибо печатать надобно много и на матричном принтере. Текстовый документ формируется следующими командами:
F=FCREATE('rezalt.txt') FPUTS(F, 'что') FCLOSE(F) Как програмно создать текстарь под DOS т.е. 866 к.страницу? чтоб сразу можно отправлять на печать (copy rezalt.txt LPT1) без преобразования текстового файла в другую кодовую страницу левыми приложениями. |
Re: txt in Win to Dos | |
---|---|
Владимир Максимов Сообщений: 14095 Откуда: Москва Дата регистрации: 02.09.2000 |
Примерно так:
Хотя, все то же самое можно сделать и с готовым файлом прогнав через
PS: Функции StrToFile() и FileToStr() появились только в VFP6. В младших версиях придется качать через мемо-поле (APPEND MEMO, COPY MEMO). Кстати, у этих команд есть возможность указать кодовую странцу (опция AS) ------------------ |
Re: txt in Win to Dos | |
---|---|
Igor Korolyov Сообщений: 34580 Дата регистрации: 28.05.2002 |
Hi, GoshaS!
CPCONVERT() ------------------ WBR, Igor |
Re: txt in Win to Dos | |
---|---|
Gosha$ Автор |
Спасибо, только ошибочка в написании, надобно так:
StrToFile(CPCONVERT(1251, 866, FileToStr('rezalt.txt')),'rezaltDOS.txt') Работает все на ура. Еще раз спасибо. |
© 2000-2024 Fox Club  |