zenja wrote:

Рано обрадовался( Передача файлов идет, текстовые нормально передаются, а с картинками беда, приходят коцаными. В чем может быть проблема, не пойму.

Добрый день!
Помнится, давно ещё при работе с FTP с командной строкой был параметр TYPE, который может быть или ASCII, или BINARY. Видимо, по умолчанию передаётся в ASCII.

2

(42 replies, posted in Russian)

spravka2004 wrote:

Программа для бизнеса связанного с услугами. Программа писанная "под себя" но с замахом на то, чтобы её можно было модифицировать под любой бизнес связанный с предоставлением услуг. Попытался сделать "красиво".

https://www.intel63.ru/news/data/upimages/spravka2004/snimok-ekrana-77.png


Файл прицепил к сообщению, но на всякий случай, если не зацепился - выкладываю в облако. https://disk.yandex.ru/d/2RWc2Oai1XvThw

Добрый день! Ссылка не работает, увы (((

Добрый день, Дмитрий, есть ли скидка на версию 5 с минорными обновлениями для тех, кто пользовался версией 4.хх?

4

(25 replies, posted in Russian)

Подскажите, пожалуйста, можно ли скрыть в компоненте TreeView строчки слева, что бы внешний вид был как на приложенной картинке?
https://a.radikal.ru/a20/1803/4d/891eba2c9a09.png

5

(3 replies, posted in Russian)

Добрый день, я когда-то задавал вопрос по центрированию, возможно, это то, что Вы ищите http://myvisualdatabase.com/forum/viewtopic.php?id=3654
По высоте заголовка точно не знаю - возможно, типа Form1.TableGrid1.Columns.Header.Height := 50 ??? надо пробовать
P.S/ Попробовал в примере задать высоту - не, не прокатило. Может, ещё кто подскажет. Приложил пример проекта, где игрался с центрированием (а также с вычисляемыми полями дат)

Спасибо! Что-то я на http://myvisualdatabase.com/help_ru/  заглянуть не догадался)))

Собственно, вопрос в заголовке темы - бывает ли TableGrid (точнее, похожий на него компонент), в котором возможно размещение в нескольких строках. Для примера накидал в Excel ячейки с несколькими строками.
Вопрос не для решения какой-то конкретной задачи, а так, для самообразования.

Нашёл как это реализуется в Delphi, (не по NTP или SNTP, а по протоколу TIME), но там через компоненты Internet Direct (InDy).
На всякий случай ссылку дам. вдруг кому пригодится:
http://www.delphisources.ru/forum/showt … hp?t=25449

Добрый день! Может через систему это как-то делать, например, через службу времени Windows :
w32tm /stripchart /computer:time.windows.com /samples:1 /dataonly > temp.txt,
она нам выдаёт:

Отслеживание time.windows.com [51.141.32.51:123].
Сбор образцов 1.
Текущее время - 10.01.2018 10:55:56.
10:55:56, -00.0127976s

и записала во временный файл,
а потом из третьей строки данные извлекаем в программу?

Согласен, костыльно )))

Видимо да, не умеет пока работать с SSL. Тоже недавно пробовал, сначала думал, что проблема в брэднмауре/антивирусе, прописывал правила для программ и портов. Моей ошибкой было то, что проверял с помощью TELNET и PUTTY. Потом скачал OpenSSL под Windows и увидел, что команда "OpenSSL> s_client -host pop.list.ru -port 995" всё прекрасно открывает, сервер показывает свой сертификат, ждёт ввода команд. Так же обратил внимание, что многие проекты почтовых программ идут вместе с библиотеками LIBEAY32.DLL и SSLEAY32.DLL, которые, видимо, и помогают устанавливать связь через SSL. Может, когда-нибудь и добавится поддержка.

https://sourceforge.net/projects/gnuwin … rror=netix

Добрый день! У меня не ответ на Ваш вопрос, просто вспомнил, что в 1С-ке, в 7-х и 8-х версиях есть контекстная команда "Копировать", которая создаёт новый документ по образцу  выделенного, присваивая новый номер.  Может посмотреть, как это реализовано там?

Ещё один способ, без использования сторонних утилит, тоже с недостатками, через объект RichTextEdit
https://helpdesk.freshoffice.ru/hc/ru/a … %B8%D1%8F-

Добрый день!
В процессе изучения MVDB заинтересовался возможностью создания отчета в Fast Report из уже имеющейся формы документа, например MS Word или Excel. По форумам нашёл утилиту, которая позволяет это сделать. Точнее, делается в два этапа:
1) Сначала документ надо сохранить в формате XPS
2) Затем уже преобразовать в *.FR3
У утилиты есть, естественно, и некоторые недостатки:
1) XPS нужен только версии 1.0. Тот, что делает Office 2007 или виртуальный принтер XPS в Windows 10 уже не подходит, пришлось мне поднять в виртуалке Windows XP и установить XPS Essentials Pack с сайта Майкрософт.;
2) Шрифт в экспорте задаётся только один;
3) Требуется всё-таки окончательная "доработка напильником" полученного документа.
Но это всё-же некритичные проблемы, программа достаточно хорошо справляется даже со сложным форматированием. Делал ли автор после этой первой бэты другие версии программы - неизвестно (я не нашёл, как и имени самого автора).
Прилагаю архив с этой программой к сообщению.

Нашёл здесь https://www.fastreport.ru/ru/forum/inde … topic=6326

14

(33 replies, posted in Russian)

Спасибо, программа активировалась.

15

(33 replies, posted in Russian)

Здравствуйте, Дмитрий!
Обновил версию с 4.02 на 4.04 - программа стала незарегистрированной. Откатился на предыдущую версию (хорошо, что оставил  инсталлятор) - регистрация вернулась. Посмотрите, пожалуйста.

16

(23 replies, posted in Russian)

Подскажите, пожалуйста, возможно ли расширить действие скрипта так, что бы он выдавал разные сообщения в случае, если сайт вообще не удаётся найти (аналог в выводе консольной PING.EXE  "При проверке связи не удалось обнаружить узел tratatata.ta Проверьте имя узла и повторите попытку" и когда сайт или ip-адрес просто не отвечает  по каким-нибудь причинам ("Превышен интервал ожидания для запроса")?

Может, как вариант, предусмотреть в каталоге программы что-то типа папки "Recovery" или "Backup", а в среде разработки настройку вида "Автосохранение каждые NN минут". Можно еще задать количество откатов. Примерно что бы содержимое папки было такое:

%projectname%.1
forms.1
script.1
settings.1
tables.1
.
.
.
%projectname%.n
forms.n
script.n
settings.n
tables.n

Т.е. пользователь задал количество резервных копий = n. Туда же ещё можно дублировать актуальные INI, VDB и PAS.
Файлы не обязательно держать в отдельной папке, можно в архиве, например, ZIP

Дополнительно можно прикрутить параметр "Создать копию перед запуском проекта"

Накидал в редакторе и Пейнте примерный вид такой настройки

Ну или отдельная программа или cmd, и кнопочка для её вызова в среде разработки для запуска этой функции .

Как-то так.

Большое спасибо всем за ответы! Не обращал внимания на script.dcu, почитал про тип файла, понял его назначение.

Здравствуйте!
Подскажите, пожалуйста, как защитить (или скрыть) содержание файла SCRIPT.PAS от любопытных глаз или от непреднамеренной (или намеренной) порчи или искажения?

Спасибо, Дмитрий!

Добрый день!
Подскажите, пожалуйста, если кто знает, какое событие можно использовать при переходе в TableGrid на другую строку? То есть без разницы, нажали ли мышкой или переходим по записям с помощью клавиатуры, выше или ниже. Искал в справке - ничего близкого.
В Делфи вроде есть событие AfterScroll (нашёл по поиску в инете, http://www.cyberforum.ru/delphi-databas … 47383.html ).

22

(2 replies, posted in Russian)

Добрый день!
Не вот эта ли? http://myvisualdatabase.com/forum/viewtopic.php?id=679/ что-то там про больницу было

23

(5 replies, posted in Russian)

Спасибо, Андрей, даже не обращал внимание на эту галочку.

24

(5 replies, posted in Russian)

Pt.82, Дмитрий, спасибо! Ещё спасибо Baster.89 за эту тему На всякий случай приложу слегка переделанный проект, вдруг кому пригодится.
Дмитрий, ешё такой вопрос или пожелание, это уже ближе к теме Что реализовать в первую очередь?  - может стоит добавить в стандартные действия для кнопок вариант "Сохранить запись" (без закрытия формы). Возможен еще вариант, что после нажатия кнопки "Сохранить" поля формы очищаются - это может пригодиться при массовом внесении записей в БД. Для этого, в принципе, я и затевал эти SQL-запросы.

25

(5 replies, posted in Russian)

Добрый день!
Экспериментирую с SQL запросами, задал в действии кнопки SQL запрос:
INSERT INTO test (textfield, integerfield, datefield) VALUES ('la-la-la', 12345, CURRENT_TIMESTAMP)
Данные в таблицу записываются, но вылетает ошибка: Cursor not returned from Query
Что надо дописать в этой команде, что бы сообщение об ошибке исчезло?
Спасибо!