HiUpdate rus версия

Вверх ↑

Форумы СхемыHiUpdate rus версия ← Ctrl1 234 5 6 7 8 9 10Ctrl →

Этот топик читают: Гость

Разработчик

Ответов: 26151

Рейтинг: 2127

#31: 2009-06-20 12:46:49 ЛС | профиль | цитата

Посмотрю, обязательно. Пока, заююзал то, что нашел, повыкидывал и заменил добрую часть.
------------ Дoбавленo в 12.50:

Tad писал(а):

Почему список удваивается

У меня нормально работает, список один на экране, а дальше не проверял
------------ Дoбавленo в 13.01:
Кстати, штатный FilePart Dilma загнал в невидимую вкладку, как ты и предлагал

карма: 22

Разработчик

Ответов: 4698

Рейтинг: 426

#32: 2009-06-20 13:25:24 ЛС | профиль | цитата

Tad писал(а):

Бардак, конечно

Об этом где-то я отписывался, там где я писал, чтоб дата не изменялась, когда происходит слепление сообщений(т.е истинная дато создания не известна) , это поправили, а вот чтоб непрочитанным было, нет. Да... из-за исправления недочета, появился еще один недочет...

карма: 10

Мой сайт, Мои рассказы

Гость

Ответов: 17029

Рейтинг: 0

#33: 2009-06-20 13:28:24 правка | ЛС | профиль | цитата

Редактировалось 1 раз(а), последний 2017-03-03 18:19:42

карма: 0

Ответов: 16884

Рейтинг: 1239

#34: 2009-06-20 13:35:08 ЛС | профиль | цитата

nesco, а у меня после сворачиванияразворачивания формы вот такое и не могу понять почему.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 1

a5.png [3.7KB] [352]

Разработчик

Ответов: 26151

Рейтинг: 2127

#35: 2009-06-20 15:32:26 ЛС | профиль | цитата

Tad писал(а):

формы вот такое и не могу понять почему

А потому, что используешь Activate формы и не очищаешь список

карма: 22

Ответов: 16884

Рейтинг: 1239

#36: 2009-06-20 16:05:34 ЛС | профиль | цитата

nesco, я уже все варианты перепробовал.
------------ Дoбавленo в 16.34:
Вот здесь не Activate и чистка есть. Откуда оно берет второй список или где-то буфер не чистится - не понимаю.


Add(MainForm,2953706,56,161)
{
 Width=445
 Height=352
 Font=[Arial,10,0,0,204]
 Caption="Обновление программы HiAsm"
 BorderStyle=1
 Position=1
 Point(onShow)
 link(onShow,3288357:doPing,[(96,188)(96,167)])
}
Add(MultiElementEx,9986156,273,126)
{
 @Hint=#43:Чтение списка файлов и их контрольных сумм |
 link(onStop,13672992:doWork1,[])
 link(onEndEnum,13672992:doWork2,[])
}
BEGIN_SDK
  Add(EditMultiEx,13606272,14,0)
  {
   WorkCount=#19:Start=начало работы|7:doClear|
   EventCount=#24:onStop=Закачка завершена|9:onEndEnum|
   VarCount=#37:Result=http://hiasm.narod.ru/hi_zvcs/|
   Width=384
   Height=144
   link(Start,16237997:doStrCat,[(35,6)(35,41)])
   link(doClear,16036371:doClear,[(157,13)(157,27)])
   link(Result,16237997:Result,[(20,86)(55,86)])
  }
  Add(HTTP_Get,16180479,147,35)
  {
   link(onDownload,9579638:doDeCompress,[])
   link(onStop,14881333:doEnum,[(187,62)(187,90)])
  }
  Add(Convertor,7093061,238,35)
  {
   Mode=11
   link(onResult,16036371:doText,[])
  }
  Add(StrCat,13715317,91,35)
  {
   Str2="hashed.txt"
   link(onStrCat,16180479:doDownload,[])
  }
  Add(StrList,16036371,315,14)
  {
   Point(doSort)
  }
  Add(StrCat,16237997,49,35)
  {
   Str1="http://hiasm.narod.ru"
   Str2="/hi_zvcs/"
   link(onStrCat,13715317:doStrCat,[])
  }
  Add(ZLIB,9579638,196,35)
  {
   link(onStream,7093061:doConvert,[])
  }
  Add(ArrayEnum,14881333,329,84)
  {
   link(onItem,13606272:onStop,[(382,90)(382,6)])
   link(onEndEnum,13606272:onEndEnum,[(390,97)(390,13)])
   link(Array,16036371:Array,[])
  }
END_SDK
Add(ChildGroupBox,13672992,329,126)
{
 @Hint=#24:Отбор файлов для закачки|
 link(onEvent1,6503252:doData,[(379,132)(379,467)(280,467)(280,433)])
 link(onEvent2,11921051:doWork2,[(373,139)(373,34)(36,34)(36,223)])
 link(Data1,14996553:Result,[])
}
BEGIN_SDK
  Add(EditMulti,12520503,21,21)
  {
   EventCount=2
   WorkCount=5
   DataCount=1
   VarCount=2
   Width=335
   Height=277
   link(doWork1,14575946:doSplit,[(87,27)(87,34)])
   link(doWork2,6532100:doCompare,[(57,34)(57,258)])
   link(doWork3,6547804:doSelect,[(70,41)(70,167)])
   link(doWork4,6547804:doSave,[(77,48)(77,160)])
   link(doWork5,6547804:doClear,[(109,55)(109,132)])
   link(Var1,2079398:Var1,[(27,226)])
   link(Var2,6547804:String,[(34,234)(223,234)])
  }
  Add(GroupBox,4919579,259,42)
  {
   Left=10
   Top=10
   Width=243
   Height=271
   Font=[MS Sans Serif,12,1,0,1]
   Caption="Новые файлы"
  }
  Add(ListBox,6547804,196,119)
  {
   Left=15
   Top=25
   Width=210
   Height=235
   Font=[Arial,12,0,0,204]
   Point(doSelect)
   Point(String)
   link(onClick,6547804:doDelete,[(238,132)(238,183)(184,183)(184,139)])
   link(Str,14575946:Right,[])
   link(FileName,12520503:Data1,[(209,70)(27,70)])
  }
  Add(StrPart,14575946,189,28)
  {
   Char=" "
   Point(Left)
   Point(Right)
   link(onSplit,14830115:doFileHashsum,[(229,34)(229,79)(91,79)(91,125)])
  }
  Add(Hashsum,14830115,105,112)
  {
   link(onResult,4562575:doCompare,[])
  }
  Add(If_else,4562575,147,112)
  {
   link(onFalse,6547804:doAdd,[])
   link(Op2,14575946:Left,[(160,86)(195,86)])
  }
  Add(GetDataEx,2079398,196,217)
  {
   link(Data,6547804:Count,[])
  }
  Add(If_else,6532100,203,252)
  {
   Op2=Integer(0)
   link(onTrue,12520503:onEvent1,[(327,258)(327,27)])
   link(onFalse,12520503:onEvent2,[(338,265)(338,34)])
   link(Op1,2079398:Var2,[])
  }
END_SDK
Add(Hub,2630176,175,105)
{
 OutCount=5
 link(onEvent1,11075532:doEvent1,[(201,111)(201,149)(163,149)(163,188)])
 link(onEvent3,8042306:doStrCat,[(238,125)(238,90)])
 link(onEvent4,9986156:Start,[])
 link(onEvent5,14996553:doStrCat,[(194,139)(194,83)])
}
Add(Button,13883676,70,217)
{
 Left=318
 Top=246
 Width=102
 Height=35
 Font=[MS Sans Serif,8,1,0,1]
 Enabled=1
 TabOrder=-1
 Caption="ОБНОВИТЬ"
 Data=Integer(0)
 Point(doEnabled)
 link(onClick,6880873:doEvent1,[])
}
Add(Label,14404991,392,336)
{
 Left=285
 Top=131
 Width=115
 Height=80
 Font=[MS Sans Serif,12,1,255,1]
 Caption=""
 AutoSize=1
 Alignment=2
 Point(doVisible)
}
Add(Hub,8282336,280,238)
{
 OutCount=5
 link(onEvent1,13672992:doWork3,[(320,244)(320,146)])
 link(onEvent2,10243851:doString,[(504,251)(504,174)])
 link(onEvent3,15999216:doString,[(511,258)(511,209)])
 link(onEvent4,2007639:doMove,[])
 link(onEvent5,2048370:doStrCat,[])
}
Add(StrCat,14996553,329,77)
{
 Str2=".txt"
 link(Str1,10364385:Var2,[])
}
Add(Time,12591192,329,14)
{
 Format="YMD_hm"
}
Add(StrCat,8042306,273,84)
{
 Str1="Обновление программы HiAsm  на   "
 link(onStrCat,2953706:doCaption,[(313,90)(313,70)(47,70)(47,167)])
 link(Str2,10364385:Var1,[(286,58)])
}
Add(GetDataEx,10364385,322,49)
{
 link(Data,12591192:FormatTime,[])
}
Add(ProgressBar,14675874,686,322)
{
 Left=10
 Top=295
 Width=415
 Height=15
 Color=-16777206
 Ctl3D=0
 Max=0
 Smooth=1
 ProgressColor=16711680
 Point(doMax)
}
Add(HTTP_Get,13142930,525,308)
{
 Wait=0
 link(onStatus,7220894:doWork2,[])
 link(onDownload,13547628:doDeCompress,[(565,321)(565,286)])
 link(onURLSize,9907604:doEvent1,[])
}
Add(StrCat,2048370,392,266)
{
 link(onStrCat,7664994:doEvent1,[(450,272)(450,328)])
 link(Str1,9986156:Result,[(398,228)(279,228)])
 link(Str2,10228305:Var2,[])
}
Add(ZLIB,13547628,616,273)
{
 link(onStream,6242335:doCopyFromStream,[])
}
Add(FileStream,6242335,686,259)
{
 Mode=1
 AutoCopy=0
 Point(doCopyFromStream)
 link(FileName,10228305:Var3,[(692,219)])
}
Add(Hub,7664994,476,322)
{
 OutCount=3
 link(onEvent1,13142930:GetURLSize,[])
 link(onEvent2,13142930:doDownload,[(506,335)(506,314)])
 link(onEvent3,8686078:doProcessMessages,[(507,342)(507,349)])
}
Add(Application,8686078,525,343)
{
}
Add(Hub,9907604,581,322)
{
 link(onEvent1,15208502:doWork2,[])
 link(onEvent2,14675874:doMax,[])
}
Add(Memory,5060034,616,315)
{
 Default=Integer(0)
 link(onData,7220894:doWork3,[(662,321)])
}
Add(HubEx,7220894,658,301)
{
 link(onEvent,14675874:doPosition,[(677,314)(677,328)])
}
Add(DoData,13298349,294,336)
{
 Data=String(Обновление закончено)
 link(onEventData,15168872:doWork2,[])
}
Add(Hub,6880873,119,217)
{
 OutCount=4
 link(onEvent1,11921051:doWork1,[(144,223)(144,208)(46,208)])
 link(onEvent2,13672992:doWork4,[(218,230)(218,153)])
 link(onEvent3,7949789:doValue,[(479,237)(479,90)])
 link(onEvent4,1119681:doFor,[])
}
Add(DoData,16400650,294,378)
{
 Data=Integer(0)
 link(onEventData,11921051:doWork3,[(336,384)(336,417)(46,417)])
}
Add(HubEx,11921051,42,210)
{
 link(onEvent,13883676:doEnabled,[])
}
Add(Hub,9406442,266,336)
{
 OutCount=3
 link(onEvent1,13298349:doData,[])
 link(onEvent2,16400650:doData,[(285,349)(285,384)])
 link(onEvent3,15208502:doWork3,[(606,356)])
}
Add(DoData,6503252,294,427)
{
 Data=String(Нет файлов для обновления)
 link(onEventData,15168872:doWork3,[(347,433)])
}
Add(HubEx,15168872,343,329)
{
 link(onEvent,14404991:doText,[])
}
Add(Dir,14792488,588,91)
{
}
Add(Dir,11138793,693,168)
{
}
Add(FormatStr,10243851,588,168)
{
 Mask="%1\%2"
 link(onFString,9688587:doWork2,[])
 link(Str1,3889994:Var2,[])
 link(Str2,5085497:Var1,[(601,144)])
}
Add(FileTools,2007639,518,259)
{
 link(FileName,5085497:Var2,[])
 link(NewFileName,15999216:FString,[(531,247)(538,247)])
}
Add(Memory,7949789,539,84)
{
 Point(Data)
 link(Data,10364385:Var3,[(545,58)])
}
Add(FormatStr,15999216,532,203)
{
 DataCount=3
 Mask="%3\%2\%1"
 Point(FString)
 link(onFString,9688587:doWork3,[(627,209)])
 link(Str1,5085497:Var3,[(538,149)])
 link(Str2,7949789:Value,[])
 link(Str3,3889994:Var1,[(552,156)])
}
Add(HubEx,9688587,623,161)
{
 link(onEvent,11939829:doPart,[])
}
Add(GetDataEx,3889994,581,147)
{
 link(Data,14792488:CurrentDir,[])
}
Add(HubEx,15208502,602,315)
{
 link(onEvent,5060034:doClear,[])
}
Add(MultiElementEx,3288357,105,161)
{
 @Hint=#32:Проверка подключения к интернету|
 link(onFind,2630176:doEvent1,[(150,167)(150,111)])
 link(onEventData,15168872:doWork1,[(347,174)])
}
BEGIN_SDK
  Add(EditMultiEx,1017088,21,21)
  {
   WorkCount=#6:doPing|
   EventCount=#6:onFind|11:onEventData|
   Width=132
   Height=95
   link(doPing,14480880:doPing,[(35,27)(35,69)])
  }
  Add(Ping,14480880,49,63)
  {
   Name="http://hiasm.narod.ru"
   TimeOut=5000
   link(onFind,1017088:onFind,[(117,69)(117,27)])
   link(onFailed,3997543:doData,[])
  }
  Add(DoData,3997543,98,70)
  {
   Data=String(Сервер не найден)
   link(onEventData,1017088:onEventData,[(141,76)(141,34)])
  }
END_SDK
Add(FilePartElm,11939829,644,168)
{
 Mode=0
 link(onPart,11138793:doDir,[])
}
Add(GetDataEx,5085497,511,140)
{
 Angle=3
 link(Data,10228305:Var1,[(405,149)])
}
Add(For,1119681,210,238)
{
 IncludeEnd=1
 link(onEvent,8282336:doEvent1,[])
 link(onStop,9406442:doEvent1,[(254,251)(254,342)])
 link(End,13672992:Var1,[(223,218)(335,218)])
}
Add(GetDataEx,10228305,392,210)
{
 Angle=3
 link(Data,13672992:Var2,[(342,219)])
}
Add(Hub,11075532,175,182)
{
 link(onEvent1,9986156:doClear,[(210,188)(210,139)])
 link(onEvent2,13672992:doWork5,[(248,195)(248,160)])
}

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Гость

Ответов: 17029

Рейтинг: 0

#37: 2009-06-20 16:47:44 правка | ЛС | профиль | цитата

Редактировалось 1 раз(а), последний 2017-03-03 18:19:43

карма: 0

Разработчик

Ответов: 4698

Рейтинг: 426

#38: 2009-06-20 16:59:28 ЛС | профиль | цитата

У меня все нормально с этой схемой, только после четырех сворачиваний/разворачиваний runtimeerror216
------------ Дoбавленo в 17.03:
Хотя нет, есть все-таки такая фича со списком, мне кажется дело в том, что когда ты разворачиваешь, запускается поток со скачиванием списка и сравнением хеш-сумм, это длится 3-4сек, а мы опять сворачиваем и разворачиваем, вот и опять в поток, а не очищается, так как в потоке это первым делом, а потом закачка и сравнение

карма: 10

Мой сайт, Мои рассказы

Гость

Ответов: 17029

Рейтинг: 0

#39: 2009-06-20 17:03:33 правка | ЛС | профиль | цитата

Редактировалось 1 раз(а), последний 2017-03-03 18:19:43

карма: 0

Гость

Ответов: 17029

Рейтинг: 0

#40: 2009-06-20 17:33:09 правка | ЛС | профиль | цитата

Редактировалось 1 раз(а), последний 2017-03-03 18:19:43

карма: 0

Разработчик

Ответов: 26151

Рейтинг: 2127

#41: 2009-06-20 17:43:58 ЛС | профиль | цитата

Tad, Activate выдается дважды при разворачивании, а чистишь ты один раз по Show перед Activate



Add(MainForm,2953706,21,105)
{
 Point(onShow)
 link(onActivate,15628666:doData,[])
 link(onShow,15983376:doData,[(65,132)(65,160)])
}
Add(ListBox,13728688,154,105)
{
 Left=25
 Top=10
 Width=205
 Height=205
}
Add(DoData,15628666,77,105)
{
 Data=String(Activate)
 link(onEventData,1546657:doWork2,[])
}
Add(DoData,15983376,77,154)
{
 Data=String(Show)
 link(onEventData,1546657:doWork3,[(130,160)])
}
Add(HubEx,1546657,126,98)
{
 link(onEvent,13728688:doAdd,[])
}

карма: 22

Гость

Ответов: 17029

Рейтинг: 0

#42: 2009-06-20 18:01:47 правка | ЛС | профиль | цитата

Редактировалось 1 раз(а), последний 2017-03-03 18:19:43

карма: 0

Ответов: 16884

Рейтинг: 1239

#43: 2009-06-20 18:23:59 ЛС | профиль | цитата

nesco, пришлось поставить Timer между MainForm.Activate и Ping для превращения сдвоенного события в одинарное.
Фантастика.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Гость

Ответов: 17029

Рейтинг: 0

#44: 2009-06-21 10:29:56 правка | ЛС | профиль | цитата

Редактировалось 1 раз(а), последний 2017-03-03 18:19:43

карма: 0

Ответов: 16884

Рейтинг: 1239

#45: 2009-06-21 10:34:16 ЛС | профиль | цитата

nesco, вот захотел посмотреть очередность событий MainForm (блоки разбиты пунктиром)
1-й блок - запуск
2-й - свернуть
3-й развернуть

Почему при разворачивании срабатывает DeActivate пока не смотрел, но НЕПРАВИЛЬНО ЭТО !

А событие Show вообще ни о чем не говорит - просто пустое событие и все. Неизвестно Show ON или Show OFF
------------ Дoбавленo в 11.35:
а вот так за третим разом и последующими

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

файлы: 2

a6.png [3.2KB] [219], a7.png [1.2KB] [288]

Форумы СхемыHiUpdate rus версия ← Ctrl1 234 5 6 7 8 9 10Ctrl →


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