Вверх ↑
Этот топик читают: Гость
Этот топик был перемещен из раздела "Помощь по среде"
Ответов: 16884
Рейтинг: 1239
#31: 2020-02-17 15:00:56 ЛС | профиль | цитата
© Михаил Жванецкий писал(а):
Может, что-то в консерватории подправить?
Nic, это бесполезно.
Если лень почитать, что
Реляционная база данных – это набор данных с предопределенными связями между ними.
а не куча данных одной строкой, то о чём можно говорить.
Только о
Разделение предложения на части

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 323
Рейтинг: 8
#32: 2020-02-17 15:52:27 ЛС | профиль | цитата
Tad писал(а):
Если БЫ в БД были

Всё там есть, но то с чего всё началось - это дление на части предложения, что бы уложить например на 2-3 строки (дабы оно невылазело за границы строки)
карма: 0

0
Ответов: 8930
Рейтинг: 823
#33: 2020-02-17 20:08:40 ЛС | профиль | цитата
Dad2016, в приложении IC разделяющий длинную строку на строки по пробелам с количеством символов не более чем задано, первая строка задаётся отдельно. Опционально в строках добавляется необходимое количество пробелов до заданной длины.
Надеюсь этим кончится
https://forum.hiasm.com/getfile/38900
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#34: 2020-02-17 21:24:51 ЛС | профиль | цитата
Леонид, в документе между строками по 84 знака есть 4 строки по 45,53,42,30 знаков. И длинна этих "коротких" строк может быть, от документа к документу, +/- километр.

Редактировалось 2 раз(а), последний 2020-02-17 21:30:45
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8930
Рейтинг: 823
#35: 2020-02-17 22:30:04 ЛС | профиль | цитата
Tad, нет, у ТС обозначены номера и каждая строка в номере для разбивки начинается с короткой и уже потом по 84 символа.
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#36: 2020-02-17 22:41:48 ЛС | профиль | цитата
А это дублирование только у меня ????
Леонид_19.jpg
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 323
Рейтинг: 8
#37: 2020-02-18 06:21:32 ЛС | профиль | цитата
Леонид писал(а):
Надеюсь этим кончится

Не совсем.
Это шаблон акта для заполнения:
1.jpg
Заполненный акт:
2.jpg
Внутренняя часть программы:
3.jpg
4.jpg
Дело в том, что каждая перенесённая часть предложения помещается в отдельную строку не соеденённую вместе. То есть если строка делится на 3 части, то она делится на три отдельных окна. В твоей программе она делится в общем окне.

Редактировалось 1 раз(а), последний 2020-02-18 06:24:15
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#38: 2020-02-18 08:46:13 ЛС | профиль | цитата
Dad2016 писал(а):
Tad писал(а):
Если БЫ в БД были

Всё там есть, но то с чего всё началось - это дление на части предложения, что бы уложить например на 2-3 строки (дабы оно невылазело за границы строки)

Dad2016, Интересно, какую БД используешь ?
Если ты на самом деле используешь БД, во что, судя по схемам, верится с трудом, то вот тебе намёк на решение твоей схемы из самого первого поста:
Add(MainForm,3835118,28,210)
{
Width=528
Height=234
Position=1
Point(onClose)
link(onCreate,1641171:doOpen,[])
link(onClose,1641171:doClose,[])
}
Add(Memo,12539502,119,140)
{
Left=5
Top=10
Width=310
Strings=#185:Требованиям к составу и порядку ведения исполнительной документации при строительстве, реконструкции, капитальном ремонте объектов капитального строительства и требования, предъявляемые|
}
Add(Edit,4910093,336,224)
{
Left=5
Top=100
Width=490
Text=""
}
Add(Edit,13865190,294,231)
{
Left=5
Top=125
Width=490
Text=""
}
Add(Message,14153560,203,266)
{
}
Add(DS_SQLite,1641171,77,224)
{
Name="mydb"
FileName=":memory:"
link(onOpen,5722829:doString,[])
}
Add(DSC_Query,14272706,161,224)
{
DSManager="mydb"
link(onQuery,5788099:doSeparateMT,[])
link(onError,14153560:doMessage,[(198,244)(198,272)])
}
Add(FormatStr,5722829,119,224)
{
Mask="SELECT substr("%1",1,86),\r\n substr("%1",1+86,86),\r\n substr("%1",1+86+86,86);"
link(onFString,14272706:doQuery,[])
link(Str1,12539502:Text,[])
}
Add(MT_MultiData,5788099,203,224)
{
Count=3
link(onData1,4910093:doText,[])
link(onData2,13865190:doText,[])
link(onData3,7703503:doText,[])
}
Add(Edit,7703503,252,238)
{
Left=5
Top=150
Width=490
}

Заметь, всего 10 компонент вместо твоих 44-х.

Редактировалось 4 раз(а), последний 2020-02-18 20:27:31
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8930
Рейтинг: 823
#39: 2020-02-18 10:22:39 ЛС | профиль | цитата
Tad, скачал, разархивировал, запустил -- артефактов дублирования добиться не удалось
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#40: 2020-02-18 10:35:36 ЛС | профиль | цитата
Леонид, если нажимать на New Piece несколько раз подряд, то возможны 3 варианта:
1. Или короткой строки нет
2. Или дублирование короткой строки.
3. Или всё нормально отрабатывает.
(на кнопки нажимаю трёхсекундным таймером)

Редактировалось 1 раз(а), последний 2020-02-18 10:51:18
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8930
Рейтинг: 823
#41: 2020-02-18 13:16:44 ЛС | профиль | цитата
Tad, такой защиты не предусмотрел Но это в ваших силах
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#42: 2020-02-18 13:20:15 ЛС | профиль | цитата
Леонид, оно мне ни на не
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 323
Рейтинг: 8
#43: 2020-02-19 10:23:19 ЛС | профиль | цитата
Tad писал(а):
Заметь, всего 10 компонент вместо твоих 44-х.

Согласен, калссно сделано.
Есть одно но - если добавить слово из допустим 5 символов в начало текста то слова будут перносится частями, а не по пробелам!
Add(MainForm,3835118,350,322)
{
Width=528
Height=234
Position=1
Point(onClose)
link(onCreate,1641171:doOpen,[])
link(onClose,1641171:doClose,[])
}
Add(Memo,12539502,441,252)
{
Left=5
Top=10
Width=310
Strings=#191:Требованиям к (или) составу и порядку ведения исполнительной документации при строительстве, реконструкции, капитальном ремонте объектов капитального строительства и требования, предъявляемые|
}
Add(Edit,4910093,658,336)
{
Left=5
Top=100
Width=490
Text=""
}
Add(Edit,13865190,616,343)
{
Left=5
Top=125
Width=490
Text=""
}
Add(Message,14153560,525,378)
{
}
Add(DS_SQLite,1641171,399,336)
{
Name="mydb"
FileName=":memory:"
link(onOpen,5722829:doString,[])
}
Add(DSC_Query,14272706,483,336)
{
DSManager="mydb"
link(onQuery,5788099:doSeparateMT,[])
link(onError,14153560:doMessage,[(520,356)(520,384)])
}
Add(FormatStr,5722829,441,336)
{
Mask="SELECT substr("%1",1,86),\r\n substr("%1",1+86,86),\r\n substr("%1",1+86+86,86);"
link(onFString,14272706:doQuery,[])
link(Str1,12539502:Text,[])
}
Add(MT_MultiData,5788099,525,336)
{
Count=3
link(onData1,4910093:doText,[])
link(onData2,13865190:doText,[])
link(onData3,7703503:doText,[])
}
Add(Edit,7703503,574,350)
{
Left=5
Top=150
Width=490
}
Текст может менятся (добавил (или)).

Редактировалось 1 раз(а), последний 2020-02-19 10:24:30
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#44: 2020-02-19 12:28:25 ЛС | профиль | цитата
Tad писал(а):
Dad2016, Интересно, какую БД используешь ?
Что это секретная информация ???
Tad писал(а):
вот тебе намёк на решение твоей схемы из самого первого поста
Написал же - намёк. Вслепую, не зная типа БД и её структуры, трудновато предложить что-то конкретное.

Редактировалось 4 раз(а), последний 2020-02-19 12:47:00
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 323
Рейтинг: 8
#45: 2020-02-19 15:56:47 ЛС | профиль | цитата
Tad писал(а):
Что это секретная информация ???

Совершенно не секретная.
БД заполняется в начале строительства, в неё входят данные - юридические адреса, физические адреса, должности, ФИО ответственных лиц, распоряжения, приказы, ежедневная работа (заполняется ежедневно) и т.д.
После чего программа автоматически к определённому акту компонует нужную информацию из этой базы. К этой базе обращаются несколько программ, если делаем акт скрытых работ то в нём кроме информации из базы дополнительно вписывается инфомация по скрытым работам, если делаем акт по входному контролю тоже самое, часть формаруется из БД, часть вводится вручную. Если используем график работ, то он создаёт отчёты по сформированной базе (ежедневная работа).
Ну и так далее.
карма: 0

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)