HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуПропадают пробелы после чтения ключа ini файла. ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 6
Рейтинг: 0
#1: 2020-12-28 12:17:39 ЛС | профиль | цитата
В примере видно, что в ини файл записывается перед числом "1", три пробела, а вот читается из ини без них.
Как победить? 


Add(MainForm,2953706,413,308)
{
 Width=544
 Height=275
}
Add(Edit,12492534,665,329)
{
 Left=210
 Top=85
 Width=200
 Hint="Таямер смены строки НЕ РЕКОМЕНДУЕТСЯ ставить значенее меньше 10 сек и больше 9999 сек !"
 Text="    1"
 link(onChange,14453683:doEvent1,[])
}
Add(MultiElement,5344111,770,266)
{
}
BEGIN_SDK
  Add(EditMulti,6174360,21,21)
  {
   EventCount=1
   WorkCount=1
   VarCount=1
   Width=783
   Height=389
   link(doWork1,13934418:doEvent1,[(143,27)(143,223)])
   link(Var1,5058092:GetData,[(27,347)(489,347)])
  }
  Add(ComputerInfo,8920223,343,105)
  {
  }
  Add(StrCat,5665239,350,161)
  {
   Str2="Экрвн_покупателя_Таймер"
   link(Str1,8920223:CompName,[])
  }
  Add(Hub,13934418,266,217)
  {
   link(onEvent1,5665239:doStrCat,[(315,223)(315,167)])
   link(onEvent2,8102827:doData,[])
  }
  Add(DoData,8102827,350,224)
  {
   link(onEventData,8534663:doEvent1,[])
   link(Data,5665239:Result,[])
  }
  Add(EventFromData,5058092,483,252)
  {
  }
  Add(Hub,8534663,420,224)
  {
   link(onEvent1,6174360:onEvent1,[(593,230)(593,27)])
   link(onEvent2,5058092:doData,[(458,237)(458,258)])
  }
END_SDK
Add(Ini,491376,770,329)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
 link(Key,5344111:Var1,[(790,313)(776,313)])
}
Add(Hub,14453683,728,329)
{
 link(onEvent1,5344111:doWork1,[(760,335)(760,272)])
 link(onEvent2,491376:doWrite,[])
}
Add(MultiElement,7609219,609,322)
{
}
BEGIN_SDK
  Add(EditMulti,15446095,21,21)
  {
   EventCount=1
   WorkCount=1
   VarCount=1
   Width=783
   Height=389
   link(doWork1,2755756:doEvent1,[(143,27)(143,223)])
   link(Var1,9983250:GetData,[(27,347)(489,347)])
  }
  Add(ComputerInfo,5843068,343,105)
  {
  }
  Add(StrCat,6501792,350,161)
  {
   Str2="Экрвн_покупателя_Таймер"
   link(Str1,5843068:CompName,[])
  }
  Add(Hub,2755756,266,217)
  {
   link(onEvent1,6501792:doStrCat,[(315,223)(315,167)])
   link(onEvent2,9599626:doData,[])
  }
  Add(DoData,9599626,350,224)
  {
   link(onEventData,11465664:doEvent1,[])
   link(Data,6501792:Result,[])
  }
  Add(EventFromData,9983250,483,252)
  {
  }
  Add(Hub,11465664,420,224)
  {
   link(onEvent1,15446095:onEvent1,[(593,230)(593,27)])
   link(onEvent2,9983250:doData,[(458,237)(458,258)])
  }
END_SDK
Add(Ini,8970041,595,385)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
 link(onResult,11861219:doText,[])
 link(Key,7609219:Var1,[])
}
Add(Hub,13165309,553,378)
{
 OutCount=3
 link(onEvent1,7609219:doWork1,[(588,384)(588,328)])
 link(onEvent2,8970041:doRead,[])
}
Add(Button,10296675,490,378)
{
 Left=130
 Top=85
 link(onClick,13165309:doEvent1,[])
}
Add(Edit,11861219,665,385)
{
 Left=210
 Top=110
 Width=200
}


--- Добавлено в 2020-12-28 12:51:23

Удалось так победить 


Add(MainForm,3372200,168,154)
{
 Width=544
 Height=275
 link(onCreate,3323058:doEvent1,[(254,174)(254,223)])
}
Add(Edit,16653781,476,175)
{
 Left=210
 Top=85
 Width=200
 Hint="Таямер смены строки НЕ РЕКОМЕНДУЕТСЯ ставить значенее меньше 10 сек и больше 9999 сек !"
 Text="1"
 link(onChange,3385823:doReplace,[])
}
Add(MultiElement,16715370,637,112)
{
}
BEGIN_SDK
  Add(EditMulti,2634900,21,21)
  {
   EventCount=1
   WorkCount=1
   VarCount=1
   Width=783
   Height=389
   link(doWork1,13262747:doEvent1,[(143,27)(143,223)])
   link(Var1,11115384:GetData,[(27,347)(489,347)])
  }
  Add(ComputerInfo,8053536,343,105)
  {
  }
  Add(StrCat,6735188,350,161)
  {
   Str2="Экрвн_покупателя_Таймер"
   link(Str1,8053536:CompName,[])
  }
  Add(Hub,13262747,266,217)
  {
   link(onEvent1,6735188:doStrCat,[(315,223)(315,167)])
   link(onEvent2,2383695:doData,[])
  }
  Add(DoData,2383695,350,224)
  {
   link(onEventData,16551035:doEvent1,[])
   link(Data,6735188:Result,[])
  }
  Add(EventFromData,11115384,483,252)
  {
  }
  Add(Hub,16551035,420,224)
  {
   link(onEvent1,2634900:onEvent1,[(593,230)(593,27)])
   link(onEvent2,11115384:doData,[(458,237)(458,258)])
  }
END_SDK
Add(Ini,124559,637,175)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
 link(Key,16715370:Var1,[(657,159)(643,159)])
}
Add(Hub,5501445,595,175)
{
 link(onEvent1,16715370:doWork1,[(627,181)(627,118)])
 link(onEvent2,124559:doWrite,[])
}
Add(MultiElement,5302456,364,161)
{
}
BEGIN_SDK
  Add(EditMulti,15041074,21,21)
  {
   EventCount=1
   WorkCount=1
   VarCount=1
   Width=783
   Height=389
   link(doWork1,8133106:doEvent1,[(143,27)(143,223)])
   link(Var1,7600212:GetData,[(27,347)(489,347)])
  }
  Add(ComputerInfo,16500003,343,105)
  {
  }
  Add(StrCat,12629245,350,161)
  {
   Str2="Экрвн_покупателя_Таймер"
   link(Str1,16500003:CompName,[])
  }
  Add(Hub,8133106,266,217)
  {
   link(onEvent1,12629245:doStrCat,[(315,223)(315,167)])
   link(onEvent2,14905151:doData,[])
  }
  Add(DoData,14905151,350,224)
  {
   link(onEventData,6704801:doEvent1,[])
   link(Data,12629245:Result,[])
  }
  Add(EventFromData,7600212,483,252)
  {
  }
  Add(Hub,6704801,420,224)
  {
   link(onEvent1,15041074:onEvent1,[(593,230)(593,27)])
   link(onEvent2,7600212:doData,[(458,237)(458,258)])
  }
END_SDK
Add(Ini,16112281,350,224)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
 link(onResult,3930157:doReplace,[])
 link(Key,5302456:Var1,[])
}
Add(Hub,3323058,308,217)
{
 InCount=2
 OutCount=3
 link(onEvent1,5302456:doWork1,[(343,223)(343,167)])
 link(onEvent2,16112281:doRead,[])
}
Add(Button,4824708,203,224)
{
 Left=130
 Top=85
 link(onClick,3323058:doEvent2,[])
}
Add(Edit,2409538,497,231)
{
 Left=210
 Top=110
 Width=200
}
Add(Replace,3930157,399,224)
{
 SubStr="""
 DestStr=" "
 link(onReplace,13467835:doEvent1,[])
}
Add(Replace,3385823,532,175)
{
 SubStr=" "
 DestStr="""
 link(onReplace,5501445:doEvent1,[])
}
Add(Hub,13467835,441,224)
{
 link(onEvent1,16653781:doText,[(465,230)(465,181)])
 link(onEvent2,2409538:doText,[])
}


Редактировалось 1 раз(а), последний 2020-12-28 12:51:23
карма: 0

0
Ответов: 2236
Рейтинг: 676
#2: 2020-12-28 15:19:25 ЛС | профиль | цитата
Psaho, достаточно прочитать информацию по ini файлу в интернете.
Описание формата ini-файлов писал(а):
Пробелы и символы табуляции, стоящие до открывающей и после закрывающей квадратных скобок, игнорируются.

Так же вы не правильно используете элемент EventFromData(Генерирует событие при обращении к данным), в место него нужно использовать Memory(Запоминает данные из потока).
Но в вашей схеме можно обойтись без этих элементов
Add(MainForm,2953706,252,210)
{
}
Add(ComputerInfo,5843068,245,273)
{
}
Add(StrCat,6501792,252,329)
{
 Str2="Экрвн_покупателя_Таймер"
 link(onStrCat,8970041:doRead,[])
 link(Str1,5843068:CompName,[])
}
Add(Ini,8970041,294,329)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
 link(onResult,11861219:doText,[])
}
Add(Button,10296675,203,329)
{
 Left=130
 Top=85
 link(onClick,6501792:doStrCat,[])
}
Add(Edit,11861219,343,329)
{
 Left=210
 Top=110
 Width=200
}
Add(Edit,12492534,203,462)
{
 Left=210
 Top=85
 Width=200
 Hint="Таямер смены строки НЕ РЕКОМЕНДУЕТСЯ ставить значенее меньше 10 сек и больше 9999 сек !"
 Text="    1"
 link(onChange,14652450:doStrCat,[])
}
Add(Ini,491376,301,455)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
}
Add(ComputerInfo,12598370,245,413)
{
}
Add(StrCat,14652450,252,462)
{
 Str2="Экрвн_покупателя_Таймер"
 link(onStrCat,491376:doWrite,[])
 link(Str1,12598370:CompName,[])
}
Прочтите и посмотрите примеры в справке (нажать F1). Как минимум HiAsm\Оболочка\Основы (в самом низу Циркуляция данных).

Редактировалось 3 раз(а), последний 2020-12-28 15:21:07
карма: 11

0
Ответов: 784
Рейтинг: 168
#3: 2020-12-28 18:08:17 ЛС | профиль | цитата
Psaho, EventFromData применяется так. 

Add(MainForm,12204489,483,56)
{
 Height=136
}
Add(ComputerInfo,5843068,616,42)
{
}
Add(StrCat,6501792,623,105)
{
 Str2="_Экрвн_покупателя_Таймер"
 link(onStrCat,13586974:doData,[(662,111)(662,97)(571,97)(571,111)])
 link(Str1,5843068:CompName,[])
}
Add(Ini,8970041,567,175)
{
 FileName="seting.ini"
 Section="seting"
 Type=1
 link(onResult,258035:doReplace,[])
 link(Key,13586974:GetData,[])
}
Add(Button,10296675,455,175)
{
 Left=5
 Top=15
 link(onClick,8970041:doRead,[])
}
Add(Edit,11861219,693,175)
{
 Left=85
 Top=40
 Width=200
}
Add(Edit,12492534,455,224)
{
 Left=85
 Top=15
 Width=200
 Hint="Таямер смены строки НЕ РЕКОМЕНДУЕТСЯ ставить значенее меньше 10 сек и больше 9999 сек !"
 Text="       1"
 ClearAfterEnter=1
 link(onChange,12406493:doReplace,[])
}
Add(EventFromData,13586974,581,105)
{
 link(onEvent,6501792:doStrCat,[])
}
Add(Replace,12406493,504,224)
{
 SubStr=" "
 DestStr="#"
 link(onReplace,8970041:doWrite,[(543,230)(543,188)])
}
Add(Replace,258035,637,175)
{
 SubStr="#"
 DestStr=" "
 link(onReplace,11861219:doText,[])
}
карма: 15

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