Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Графика и игры
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 02.06.2011, 15:41
FUCKK FUCKK вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 5
Репутация: 10
По умолчанию Псевдографика

Всем летний привет=)
Ребята, есть сложность с выводом псевдографики в txt-файл.
Я сейчас на практике, мужик с завода в 90-х написал на C прогу,
она выводит файл таблицу с данными, таблица нарисована АЦКИ-символами.

Проблема в чем, в delphi если тупо набрать alt+(номер символа) выводит не
нужные символы, а плюсы с черточками, а нужна нормальная таблица.

Прогуглил тему, везде тема с кодировками ansitooem и oemtoansi. И как-то я сам в этих кодировках не очень разобрался. Если кому не сложно, объясните в 2-х словах, а еще лучше пример

Заранее спасибо
Ответить с цитированием
  #2  
Старый 02.06.2011, 16:22
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
 
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию

Скачай талб. символов и по номеру смотри какие тебе надо.
Код:
Var
 b: Byte;
 c: Char;
begin
 b:= 255; // 0-255 - все символы (255 = 'я')
 c:= Chr(b);
end;
__________________
If end Then begin;
Ответить с цитированием
  #3  
Старый 02.06.2011, 16:27
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

Просто надо для вывода подобного раритета взять шрифт подходящий. Скажем Terminal насколько я помню содержит подобные символы.
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.
Ответить с цитированием
  #4  
Старый 02.06.2011, 16:33
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Пуск-Выполнить-charmap.exe и выбираем подходящий шрифт
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #5  
Старый 02.06.2011, 16:35
FUCKK FUCKK вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 5
Репутация: 10
По умолчанию

Выводить символ по номеру я уже пробовал, и у меня есть эта таблица
В файл выводит не те символы, к-е нужны, т.е. допустим вместо нормального символа для таблицы выводит плюс и тому подобную х-ню)
Ответить с цитированием
  #6  
Старый 02.06.2011, 16:37
FUCKK FUCKK вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 5
Репутация: 10
По умолчанию

ок.. попробую через charmap.exe, поставлю terminal
Ответить с цитированием
  #7  
Старый 02.06.2011, 18:16
FUCKK FUCKK вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 5
Репутация: 10
По умолчанию

Поставил терминал.. вывел все 255 символов, нормальных там всеравно нет
Вообще дед с завода использует courier new
Ответить с цитированием
  #8  
Старый 02.06.2011, 18:19
FUCKK FUCKK вне форума
Прохожий
 
Регистрация: 02.06.2011
Сообщения: 5
Репутация: 10
По умолчанию

в COURIER NEW через charmap.exe впринципе есть такие символы, но там их всего очень много.
Например, один из них 877-й.. Как мне его через delphi вывести в файл?
Ответить с цитированием
  #9  
Старый 02.06.2011, 21:30
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Открой исходный код консольным редактором, я использую FAR. Нажатием F4 открываем текст на редактирование, F3 - просмотр. И в том и в другом случае последующее нажатие F8 переключает между DOS/Win кодировкой. Всё сам и увидишь.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 11:27.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter