powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Печать в DOS кодировке вида @ say через VFP 8
4 сообщений из 4, страница 1 из 1
Печать в DOS кодировке вида @ say через VFP 8
    #35986297
Ok888
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день!
У меня досовская таблица ( соотв байт установлен )
печатаю посредством @ ... say предварительно set device to <file>
печатает ( выводит ) в вин кодировке - 1251
Подскажите пож-та как напечатать в 866?
...
Рейтинг: 0 / 0
Печать в DOS кодировке вида @ say через VFP 8
    #35986594
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проще всего сначала завершить вывод в файл, а потом сконвертировать содержимое файла

Код: plaintext
1.
2.
lcFileName = "MyFile.txt"
=StrToFile(CPConvert( 1251 , 866 ,FileToStr(m.lcFileName)), m.lcFileName)

Правда, если объем файла не превышает 16МБ - это системное ограничение на длину символьной переменной, которая будет получена по FileToStr().

Можно еще не задавать явно номера кодовых страниц, а читать из настроек системы

CPCurrent() - без параметров - текущая кодовая страница среды FoxPro. В ней будет создан файл
CPCurrent(2) - кодовая страница сеанса DOS в текущей операционной системе. Для русскоязычной Windows будет 866, для англоязычной - 437
...
Рейтинг: 0 / 0
Печать в DOS кодировке вида @ say через VFP 8
    #35986609
Ok888
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
оо, спасибо большое Владимир!
-- очень развёрнутый ответ.
Успехов!
...
Рейтинг: 0 / 0
Печать в DOS кодировке вида @ say через VFP 8
    #35990678
Ok888
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
можно дополнить также что данный вывод реагирует на установку CODEPAGE = 866...
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Печать в DOS кодировке вида @ say через VFP 8
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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