HiAsm
HiAsm
Вверх ↑
ФорумыПрочееСоздание описания товара по шаблонам ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 133
Рейтинг: 0
#1: 2021-03-15 20:52:48 ЛС | профиль | цитата
Добрый день всем. Помогите пожалуйста.
Я занимаюсь добавлением товара в базу фирмы и мне нужно каждый раз искать описание товара. Я хочу сделать программу, чтобы можно было самому генерировать описание по шаблонам.
Чтобы можно было создавать вкладки для определенного вида товаров: например корпуса, вентиляторы, материнские платы, оперативная память и так далее. А там уже из выпадающих списков выбирать нужные параметры и чтобы они в текст формировались. И чтобы эти списки можно было редактировать.
Текст такого вида я делаю:
игровая гарнитура, 20-20000 Гц, 32 Ом, разъемы USB и 2x 3.5мм аудио

Если тут уже делали нечто подобное, подскажите пожалуйста в какой теме.
карма: 1

0
Ответов: 846
Рейтинг: 186
#2: 2021-03-15 22:03:25 ЛС | профиль | цитата
Serascer писал(а):
сделать программу, чтобы можно было самому генерировать описание по шаблонам.


Add(MainForm,2953706,21,105)
{
 Width=336
 Height=157
}
Add(ComboBox,16024458,147,91)
{
 Left=20
 Top=50
 Width=65
 Height=21
 Strings=#7:Продать|6:Купить|0:|
 Text=""
 link(onClick,16050605:doWork1,[(193,104)])
}
Add(Label,7153974,147,42)
{
 Left=25
 Top=30
 Width=54
 Height=17
 Caption="Действие"
}
Add(ComboBox,10017811,203,91)
{
 Left=90
 Top=50
 Width=65
 Height=21
 Strings=#8:квартиру|7:комнату|4:дачу|0:|
 Text=""
 link(onClick,6560988:doWork1,[(242,104)])
}
Add(Label,12696315,203,42)
{
 Left=100
 Top=30
 Width=42
 Height=17
 Caption="Объект"
}
Add(ComboBox,8538213,259,91)
{
 Left=165
 Top=50
 Width=65
 Height=21
 Strings=#8:в Москве|11:в Ярославле|7:в Твери|8:в Самаре|0:|
 Text=""
 link(onClick,6560988:doWork2,[(298,104)(298,146)])
}
Add(Label,6789611,259,42)
{
 Left=170
 Top=30
 Width=36
 Height=17
 Caption="Место"
}
Add(Edit,10668493,224,175)
{
 Left=10
 Top=90
 Width=275
 Text=""
}
Add(FormatStr,3195529,154,182)
{
 DataCount=3
 Mask="%1 %2 %3"
 link(onFString,10668493:doText2,[])
 link(Str1,16024458:String,[])
 link(Str2,10017811:String,[(167,131)(216,131)])
 link(Str3,8538213:String,[(174,138)(272,138)])
}
Add(HubEx,6560988,238,140)
{
 Angle=2
 link(onEvent,16050605:doWork2,[])
}
Add(HubEx,16050605,189,140)
{
 Angle=2
 link(onEvent,3195529:doString,[(144,146)(144,188)])
}
карма: 16

1
Голосовали:Serascer
Ответов: 133
Рейтинг: 0
#3: 2021-03-16 01:21:27 ЛС | профиль | цитата
Спасибо большое! А подскажите, как мне сделать несколько вкладок в программе?

Редактировалось 1 раз(а), последний 2021-03-16 01:21:47
карма: 1

0
Ответов: 846
Рейтинг: 186
#4: 2021-03-16 08:36:43 ЛС | профиль | цитата
Serascer писал(а):
как мне сделать несколько вкладок в программе?

Смотри вкладку error. 

Add(MainForm,563954,210,168)
{
 Width=562
 Height=306
}
Add(MultiSetParam,101949,357,91)
{
 Parameters=#13:1;0;0;0;0;0;0|13:0;1;0;0;0;0;0|13:0;0;1;0;0;0;0|13:0;0;0;1;0;0;0|13:0;0;0;0;1;0;0|13:0;0;0;0;0;1;0|13:0;0;0;0;0;0;1|
 Count=7
 link(onSet1,3535760:doVisible,[])
 link(onSet2,9260988:doVisible,[(445,104)(445,160)])
 link(onSet3,5999461:doVisible,[(438,111)(438,202)])
 link(onSet4,2725563:doVisible,[(431,118)(431,258)])
 link(onSet5,5759746:doVisible,[(424,125)(424,300)])
 link(onSet6,10881572:doVisible,[(417,132)(417,356)])
 link(onSet7,9753900:doWork1,[(410,139)(410,391)])
}
Add(MTStrTbl,9260988,483,147)
{
 Top=25
 Width=546
 Height=242
 Align=5
 Visible=1
 Name="Appendix"
 Columns=#2:No|18:PART NO./  АРТИКУЛ|11:DESCRIPTION|12:НАИМЕНОВАНИЕ|12:Q-ty/ КОЛ-ВО|13:UNIT/ ЕД.ИЗМ.|40:GROSS PRICE, EUR/ ЦЕНА ЗА ЕДИНИЦУ В ЕВРО|34:TOTAL PRICE, EUR/ ОБЩАЯ ЦЕНА, Евро|
 ColumnClick=1
 Redaction=0
 Grid=0
 Point(doVisible)
 Point(onMouseDown)
}
Add(MTStrTbl,5999461,483,189)
{
 Top=25
 Width=546
 Height=242
 Align=5
 Visible=1
 Name="broker"
 Columns=#7:АРТИКУЛ|18:МОДЕЛЬ / если есть|18:ОПИСАНИЕ ДЛЯ 31 ГР|14:КОД ТНВЭД ЕАЭС|13:СТРАНА ПРОИСХ|19:ФИРМА-ПРОИЗВОДИТЕЛЬ|2:ТМ|6:КОЛ-ВО|11:ЕД. ИЗМЕРЕН|17:КОД ИНД. УПАКОВКИ|25:КОЛИЧЕСТВО ВНЕШ. УПАКОВКИ|18:КОД ВНЕШ. УПАКОВКИ|22:ВЕС НЕТТО ИТОГОВЫЙ, КГ|36:ВЕС БРУТТО ИТОГОВЫЙ (БЕЗ ПАЛЛЕТ), КГ|24:ЦЕНА ЗА ЕД. ИЗМЕР., ЕВРО|15:СТОИМОСТЬ, ЕВРО|6:ИНВОЙС|4:ДАТА|12:СПЕЦИФИКАЦИЯ|4:ДАТА|22:НОМЕР РАЗРЕШИТЕЛЬНОГО |11:ДАТА ВЫДАЧИ|12:ДАТА ОКОНЧАН|6:СОСТАВ|7:ФАСОВКА|0:|
 ColumnClick=1
 Redaction=0
 Grid=0
 Point(doVisible)
 Point(onMouseDown)
}
Add(MTStrTbl,3535760,483,84)
{
 Top=25
 Width=546
 Height=242
 Align=5
 Name="Invoice"
 Columns=#8:Item===1|24:Material/Description===0|12:Quantity===2|8:Unit===2|9:Price===1|9:Value===1|16:Manufacturer===2|21:Country of origin===2|0:|
 ColumnClick=1
 ColorItems=0
 Redaction=0
 Grid=0
 Point(doVisible)
 Point(onLineChange)
 Point(onMouseDown)
}
Add(MTStrTbl,2725563,483,245)
{
 Top=25
 Width=546
 Height=242
 Align=5
 Visible=1
 Name="package"
 Columns=#1:1|1:2|1:3|1:4|1:5|
 ColumnClick=1
 Redaction=0
 Grid=0
 Point(doVisible)
 Point(onMouseDown)
}
Add(MTStrTbl,5759746,483,287)
{
 Top=25
 Width=546
 Height=242
 Align=5
 Visible=1
 Name="stock"
 ColumnClick=1
 Redaction=0
 Grid=0
 Point(doVisible)
 Point(onMouseDown)
}
Add(MTStrTbl,10881572,483,343)
{
 Top=25
 Width=546
 Height=242
 Align=5
 Visible=1
 Name="ivan"
 Columns=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:9|2:10|
 ColumnClick=1
 Redaction=0
 Grid=0
 Point(doVisible)
 Point(onMouseDown)
}
Add(TabControl,12598024,308,91)
{
 Width=546
 Height=25
 Align=2
 Tabs=#6:Invoce|8:Appendix|16:Table for broker|14:package weight|13:for warehouse|10:from stock|6:errors|
 Bitmaps=[]
 Border=0
 link(onChange,101949:doSet,[])
}
Add(ChildPanel,9753900,483,385)
{
}
BEGIN_SDK
  Add(EditMulti,977715,21,21)
  {
   WorkCount=1
   Width=783
   Height=487
   link(doWork1,6555359:doVisible,[(46,27)(46,118)])
  }
  Add(Panel,6555359,56,105)
  {
   Top=25
   Width=546
   Height=242
   Align=5
   Visible=1
   Point(doVisible)
  }
  Add(ComboBox,16024458,231,98)
  {
   Left=20
   Top=50
   Width=65
   Height=21
   Strings=#7:Продать|6:Купить|0:|
   Text=""
   link(onClick,16050605:doWork1,[(277,111)])
  }
  Add(Label,7153974,231,49)
  {
   Left=25
   Top=30
   Width=54
   Height=17
   Caption="Действие"
  }
  Add(ComboBox,10017811,287,98)
  {
   Left=90
   Top=50
   Width=65
   Height=21
   Strings=#8:квартиру|7:комнату|4:дачу|0:|
   Text=""
   link(onClick,6560988:doWork1,[(326,111)])
  }
  Add(Label,12696315,287,49)
  {
   Left=100
   Top=30
   Width=42
   Height=17
   Caption="Объект"
  }
  Add(ComboBox,8538213,343,98)
  {
   Left=165
   Top=50
   Width=65
   Height=21
   Strings=#8:в Москве|11:в Ярославле|7:в Твери|8:в Самаре|0:|
   Text=""
   link(onClick,6560988:doWork2,[(382,111)(382,153)])
  }
  Add(Label,6789611,343,49)
  {
   Left=170
   Top=30
   Width=36
   Height=17
   Caption="Место"
  }
  Add(Edit,10668493,308,182)
  {
   Left=10
   Top=90
   Width=275
   Text=""
  }
  Add(FormatStr,3195529,238,189)
  {
   DataCount=3
   Mask="%1 %2 %3"
   link(onFString,10668493:doText2,[])
   link(Str1,16024458:String,[])
   link(Str2,10017811:String,[(251,138)(300,138)])
   link(Str3,8538213:String,[(258,145)(356,145)])
  }
  Add(HubEx,6560988,322,147)
  {
   Angle=2
   link(onEvent,16050605:doWork2,[])
  }
  Add(HubEx,16050605,273,147)
  {
   Angle=2
   link(onEvent,3195529:doString,[(228,153)(228,195)])
  }
END_SDK
карма: 16

1
Голосовали:Serascer
Ответов: 133
Рейтинг: 0
#5: 2021-03-16 17:36:41 ЛС | профиль | цитата
Gunta писал(а):
Serascer писал(а):
как мне сделать несколько вкладок в программе?

Смотри вкладку error.



|
Большое спасибо! )
карма: 1

0
Ответов: 133
Рейтинг: 0
#6: 2021-03-16 22:16:55 ЛС | профиль | цитата
Помогите еще раз пожалуйста )
Как сделать перенос слов на следующую строк? Сейчас при формировании описания, если оно не влезает в Поле ввода, то конец не виден.

P.S. Разобрался )

Редактировалось 1 раз(а), последний 2021-03-16 22:30:55
карма: 1

0
Ответов: 133
Рейтинг: 0
#7: 2021-03-17 20:10:18 ЛС | профиль | цитата
Я закончил ) Вдруг кому надо )
В элементах Выпадающий список прописаны пути к файлам где списки строк. В соответствующих дочерних формах они должны быть одинаковыми, учтите.
Можно было бы сделать все через базу данных, но мне для работы проще использовать текстовые файлы, да и разбираться в этом не хочется )
не знаю как вставить файл или код полностью, выложил в облако себе.
https://cloud.mail.ru/public/G2i8/yzSjdy2FG

Редактировалось 1 раз(а), последний 2021-03-17 20:12:35
карма: 1

0
Ответов: 133
Рейтинг: 0
#8: 2021-03-18 22:08:11 ЛС | профиль | цитата
Эм. Возникла проблема )) Помогите еще раз пожалуйста. Если сформировать в программе описание, скопировать текст и вставить в блокнот или на сайт, то часть русского текста иероглифами получается. Не весь, а именно часть ) А если открыть текстовый файл со строками и исправить там текст, то в самой программе вместо русских букв ????? стоит. Понимаю, что дело в кодировке, но не пойму в чем именно проблема и как исправить (
карма: 1

0
8
ФорумыПрочееСоздание описания товара по шаблонам ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2024
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика