:: Visual Foxpro, Foxpro for DOS
Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Здравствуйте! Есть программа на Foxpro, которая выписывает счета (одна из функций). Можно ли добавить в формируемый счёт "чёрный квадрат", с помощью которого оплата счёта ускоряется? Если да, то как это сделать?
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
PaulWist

Сообщений: 14740
Дата регистрации: 01.04.2004
Если речь о QR-коде (Поиск)


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/1 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
ssa

Сообщений: 13085
Откуда: Москва
Дата регистрации: 23.03.2005
Konstantin_Pavlovich
Здравствуйте! Есть программа на Foxpro, которая выписывает счета (одна из функций). Можно ли добавить в формируемый счёт "чёрный квадрат", с помощью которого оплата счёта ускоряется? Если да, то как это сделать?
1. Качаешь github.com
2. По инструкции подключаешь и вставляешь что и куда надо.
3. Работаешь


------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/1 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Burn

Сообщений: 5669
Откуда: Днепр
Дата регистрации: 02.01.2002
ssa
1. Качаешь github.com
Хорошая штука. Подключил правда только просто их штрихкод для ситуации, когда стандартный метод - шрифтами не работал
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
sphinx

Сообщений: 31888
Откуда: Каменск-Уральски
Дата регистрации: 22.11.2006
Нам пока (!) такая штука без надобности ( не бегу впереди паровоза - будет задача - сделаем). Готовая картинка. Ее клиенты сами скачивают, сами врезают в диплом (все инструменты я сделал, и картинку в хранилище сохраняем на всякий случай, пользователь туповат от природы, потеряют еще чего доброго).

А надо будет прикрутить - знаю, куда посмотреть.
Спасибо!


------------------
"Veni, vidi, vici!"(с)
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Спасибо, я понял где сам чёрный квадрат взять. А какую информацию и в каком формате туда (в QR-code) вставлять? Мне надо вставить банковские реквизиты - название банка, БИК, номер расчётного счёта и т.п. В каком именно формате её вставлять? Есть для этого какой-то универсальный формат?
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Joys

Сообщений: 3571
Дата регистрации: 25.06.2000
И даже стандарт есть
sbqr.ru

Konstantin_Pavlovich
А какую информацию и в каком формате туда (в QR-code) вставлять?
Пример

ST00012|Name=ОБЩЕСТВО С ОГРАНИЧЕННОЙ ОТВЕТСТВЕННОСТЬЮ «РОГА И КОПЫТА»|PersonalAcc=40702810000000000000|BankName=НАЗВАНИЕ БАНКА|BIC=000000000|CorrespAcc=30101810200000000000|KPP=000001001|PayeeINN=00000000|Purpose=НАЗНАЧЕНИЕ ПЛАТЕЖА|Sum=0



Исправлено 1 раз(а). Последнее : Joys, 06.07.24 07:45
Ratings: 0 negative/1 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Попробовал сегодня подключить данную библиотеку. Скачал с GitHub, почитал документацию, разобрался. Осталось только подключить.
И ... сразу облом! Оказалось, что dll 32 разрядная. Не подошла.
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Никто не знает, есть где-то 64 разрядная версия чёрного квадрата?


------------------
С уважением
Стороженко Константин Павлович
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
ssa

Сообщений: 13085
Откуда: Москва
Дата регистрации: 23.03.2005
Konstantin_Pavlovich
Попробовал сегодня подключить данную библиотеку. Скачал с GitHub, почитал документацию, разобрался. Осталось только подключить.
И ... сразу облом! Оказалось, что dll 32 разрядная. Не подошла.
Куда не подошла? Как не подошла? А почему меня подошла?

------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
ssa

Сообщений: 13085
Откуда: Москва
Дата регистрации: 23.03.2005
Konstantin_Pavlovich
Никто не знает, есть где-то 64 разрядная версия чёрного квадрата?
Для работы с 32-разрядным фоксом? Ну-ну.

------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
sphinx

Сообщений: 31888
Откуда: Каменск-Уральски
Дата регистрации: 22.11.2006
ssa
Konstantin_Pavlovich
Никто не знает, есть где-то 64 разрядная версия чёрного квадрата?
Для работы с 32-разрядным фоксом? Ну-ну.

А если он в VFPA работает? Хотя сомневаюсь.


------------------
"Veni, vidi, vici!"(с)
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
DECLARE INTEGER GenerateFile IN "BarCodeLibrary.dll" ;
STRING cData, STRING cFileName

DECLARE INTEGER SetConfiguration IN "BarCodeLibrary.dll" ;
INTEGER nSize, INTEGER nImageType

В результате этого кода получаю сообщение фокспро: "Cannot load 32-bit BarCodeLibrary.dll.". Сама dll находится в той же папке, что и остальные файлы проекта.
Что я делаю не так?
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Разобрался сам, не положил dll в папку с проектом. После того, как положил куда надо, ошибка пропала.
Спасибо за помощь.


------------------
С уважением
Стороженко Константин Павлович
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Чёрный квадрат формируется с помощью библиотеки BarCodeLibrary.dll. Первый раз. При попытке второй раз создать файл с чёрным квадратом с тем же
именем но с другим текстом возникает проблема, файл или не формируется (текст в чёрном квадрате не меняется) или вообще всё портится. Потому что
при повторном формировании файл, созданный в результате предыдущего формирования чёрного квадрата, надо как-то закрыть.

Вопрос, как это можно сделать? fclose() для этого не подходит.
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
ssa

Сообщений: 13085
Откуда: Москва
Дата регистрации: 23.03.2005
А как в коде все это оформлено? Ибо у меня что-то ничего подобного нет.


------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
akvvohinc

Сообщений: 4551
Откуда: Москва
Дата регистрации: 11.11.2008
Цитата:
fclose() для этого не подходит.
Непонятно.
Так этот файл открывали вы сами с помощью FOPEN() или FCREATE()?
Где вы берете дескриптор файла для FCLOSE()?
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
Нет, не я его открывал, а библиотека сторонняя (внешняя dll). Потому fclose и не работает. Я попытался открыть его по fopen() и потом закрыть по fclose() - не помогло ( fclose(fopen('имя файла')). Попытался удалить через delete file - тоже не помогло. Помогает только выйти из программы и войти в неё заново. Из-за этой мелочи остановилась вся работа. Хоть бери и переименовывай файл в другой со случайным именем и его показывай. Но хотелось бы просто закрыть.
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
Konstantin_Pavlovich
Автор

Сообщений: 166
Откуда: Москва
Дата регистрации: 21.11.2007
DECLARE INTEGER GenerateFile IN "BarCodeLibrary.dll" STRING cData, STRING cFileName

DECLARE INTEGER SetConfiguration IN "BarCodeLibrary.dll" INTEGER nSize, INTEGER nImageType

TnSize = 8 && Размер бак кода, от 2 до 12
TnType = 0 && Тип файла, 0 - bmp, 1 - jpg, 2 - png
TcFile = "Brcode.bmp"


SetConfiguration(m.tnSize, m.tnType)
tcText = 'ST00011|NAME=ООО "Агрофирма "СемАгро"|PERSONALACC=40702810438000046280|BANKNAME=ПАО Сбербанк|BIC=044525225|CORRESPACC=30101810400000000225|SUM=1.20|PURPOSE=Счёт номер 792|'
GenerateFile(m.tcText, m.tcFile)

* Здесь надо как-то закрыть или удалить файл Brcode.bmp, чтобы можно было открыть повторно

tcText = 'comp-serv.ru'
GenerateFile(m.tcText, m.tcFile)
Ratings: 0 negative/0 positive
Re: Как добавить чёрный квадрат в счёт в программе на Foxpro?
ssa

Сообщений: 13085
Откуда: Москва
Дата регистрации: 23.03.2005
А зачем делается именно так? Вроде для вставки в печатную форму делаются действия несколько иные.


------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 16 (Гостей: 16)

© 2000-2025 Fox Club 
Яндекс.Метрика