On-line: alex_II, гостей 0. Всего: 1 [подробнее..]
АвторСообщение



Пост N: 39
Зарегистрирован: 07.02.12
ссылка на сообщение  Отправлено: 06.12.18 10:41. Заголовок: Графика?


Доброго дня, уважаемые форумчане!
А не подскажет ли кто, как графику в Клиппер-программе организовать? Вот в Бейсике есть SCREEN 12, LINE, CIRCLE. И это удобно! Искал что-то подобное для Клиппера и не нашёл!

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 22 , стр: 1 2 All [только новые]


постоянный участник


Пост N: 381
Зарегистрирован: 29.05.10
ссылка на сообщение  Отправлено: 06.06.24 13:11. Заголовок: https://i.postimg.cc..




Все очень просто. Клиппер и два файла. Шаблон и тот , где будет записан результат.
Шаблон готовите на любой машине в ворде и проверяете его печать на принтере. Если результат Вас устраивает можно забыть об управляющих символах и т.д.
Шаблон сохраняем в формате RTF и дальше работаем с этим файлом, как с ТЕКСТОВЫМ. Все, что предлагает Андрей никакого отношения к этому не имеет :)

Открываем шаблон и читаем его по строкам. Если есть метка для вставки какой-то информации заменяем ее на нужное.
"Готовую" строку записываем в выходной файл. Если считали строку с таблицей дублируем ее нужное число раз. Т.е. на выходе получаем тело таблицы.
И далее по шаблону до последней строки. Получили Rtf файл.
Речь не идет о ворде , как его открывать с олей или с кем другим. Мы работаем с обычным текстовым файлом.

Теперь все немножко подробнее. Шаблон может быть любым, проблема в его заполнении. Мы не использум доковский файл, а используем Rtf.
Если глянуть глазом, то внутри он выглядит где-то так -
..........................
{\f48\froman\fcharset186\fprq2 Times New Roman Baltic;}{\f51\fswiss\fcharset0\fprq2 Arial;}{\f49\fswiss\fcharset238\fprq2 Arial CE;}....
.....................
Берем простой примерчик: пару полей и таблица. Надеюсь на рисунке видно. В качестве метки будем использовать твердый знак ( заглавный) :)
Каким будет этот Ъ таким быдет и текст на выходе. ( Шрифт, размер, цвет ... ) . Теперь считать построчно, найти, заменить , записать...

Да, и по поиску. В rtf формате эта метка выглядит вот так - \'da
Т.е. в жизни Ъ , а в Rtf \'da
Если tp считанная строка, то поиск соответственно -
do while (tp:=AT("\'da",kk))<>0.and.i<len(strin)
Надеюсь в общем идея Вам ясна. Это простой вариант, далее можно усложнять . Например генератор отчетов

Спасибо: 0 
ПрофильЦитата Ответить



Пост N: 49
Зарегистрирован: 22.01.14
ссылка на сообщение  Отправлено: 06.06.24 22:55. Заголовок: шаблон


В дополнение к варианту MMK хочу обратить внимание на утилиту RepoRTF (http://www.vsi.ru/~apl/).
Отличный вариант работы с шаблонами. Использовал и с Clipper и cейчас с Harbour. В архиве варианты использования и куча примеров на любой вкус.

Спасибо: 0 
ПрофильЦитата Ответить
Ответов - 22 , стр: 1 2 All [только новые]
Ответ:
1 2 3 4 5 6 7 8 9
большой шрифт малый шрифт надстрочный подстрочный заголовок большой заголовок видео с youtube.com картинка из интернета картинка с компьютера ссылка файл с компьютера русская клавиатура транслитератор  цитата  кавычки моноширинный шрифт моноширинный шрифт горизонтальная линия отступ точка LI бегущая строка оффтопик свернутый текст

показывать это сообщение только модераторам
не делать ссылки активными
Имя, пароль:      зарегистрироваться    
Тему читают:
- участник сейчас на форуме
- участник вне форума
Все даты в формате GMT  3 час. Хитов сегодня: 2827
Права: смайлы да, картинки да, шрифты да, голосования нет
аватары да, автозамена ссылок вкл, премодерация откл, правка нет