Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 4698
Рейтинг: 426
#46: 2009-06-17 10:40:49 ЛС | профиль | цитата
А можно ли было вот так сделать генерацию .his-файла?
-ниже полная версия-
карма: 10
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#47: 2009-06-17 10:55:46 ЛС | профиль | цитата
Assasin, вот объясни мне -- на кой черт ставить, аж шесть, глобальных переменных на один раз. Вот так, разве, нельзя было сделать, гораздо проще. Да и в секции ini, не обязательно ставить квадратные скобки



Add(FormatStr,3868622,441,189)
{
DataCount=3
Mask="if(sys.extelement("Delphi","%1")) {
}
else {
sys.addelement("Delphi","%1","%2","%3");
}"
link(Str1,14505552:Value,[])
link(Str2,7200735:Value,[])
}
Add(Ini,16624251,378,147)
{
Section="Type"
Key="Info"
link(onResult,7200735:doValue,[(425,153)(425,125)])
}
Add(Hub,8881427,301,175)
{
OutCount=3
link(onEvent1,16008493:doPart,[(347,181)(347,111)])
link(onEvent2,16624251:doRead,[(357,188)(357,153)])
link(onEvent3,13028242:doRead,[])
}
Add(FilePart,16008493,378,105)
{
link(onName,14505552:doValue,[])
}
Add(Ini,13028242,378,189)
{
Section="Type"
Key="Tab"
link(onResult,3868622:doString,[])
}
Add(Memory,14505552,441,112)
{
}
Add(Memory,7200735,448,119)
{
}

------------ Дoбавленo в 10.58:
Да, еще -- схему можно было и по-аккуратнее нарисовать для выкладывания на обзор, там сам черт потеряется в связях
карма: 22

0
Разработчик
Ответов: 4698
Рейтинг: 426
#48: 2009-06-17 11:02:13 ЛС | профиль | цитата
nesco, я знаю про переменные и про скобки, я просто выложил идею, незаконченную правда, просто если она безнадежна чтоб дальше время не тратить. А вот полная версия: code_13768.txt
------------ Дoбавленo в 11.03:
Проверена "на себе", работает
карма: 10
0
файлы: 1code_13768.txt [12.2KB] [335]
Разработчик
Ответов: 26151
Рейтинг: 2127
#49: 2009-06-17 11:25:57 ЛС | профиль | цитата
-- Тут я чего-то муть сморозил, удалил для ясности --
карма: 22

0
Разработчик
Ответов: 4698
Рейтинг: 426
#50: 2009-06-17 11:33:54 ЛС | профиль | цитата
nesco, вы бы видели мой старый updater, там даже я сам уже ничего разобрать не могу, а здесь еще пока можно.
А разве doStop не останавливает выполняемый поток? А doStopFlag?
карма: 10
0
Ответов: 16884
Рейтинг: 1239
#51: 2009-06-17 11:48:39 ЛС | профиль | цитата
nesco писал(а):
самому написать влом было
так и сделал, но сначала искал.
Assasin писал(а):
nesco, вы бы видели мой старый updater, там даже я сам уже ничего разобрать не могу
нашел чем хвалиться
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#52: 2009-06-17 11:51:17 ЛС | профиль | цитата
Assasin писал(а):
А разве doStop не останавливает выполняемый поток?

Вообще-то я неправильно сказал. Действительно, по doStop поток уничтожается, а по doStopFlag останавливается цикл выдачи событий onExec и onSyncExec и анулирует onBysyEvent=Ignore, разрешая перезапуск. Так что ты сделал правильно (че-то меня переклинило )
------------ Дoбавленo в 11.56:
Tad писал(а):
так и сделал, но сначала искал

Я тут тоже решил нарисовать, может кому понадобится или как пример будет
карма: 22

0
Разработчик
Ответов: 26151
Рейтинг: 2127
#53: 2009-06-17 14:02:28 ЛС | профиль | цитата
Tad, вот, глянь, нарисовал. His, помимо добавления элементов, может добавлять и новые вкладки по коду hic-файла

См. ниже
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#54: 2009-06-17 14:30:23 ЛС | профиль | цитата
Буду дома, гляну объязятельно
------------ Дoбавленo в 17.45:
1. Пока не поставил

Add(Label,8109143,98,238)
{
Width=0
Height=0
Transparent=0
Caption=""
}
при компиляторе Delphi форма имела такой вид:

при FPC - вид нормальный.

2. В чем смысл этого куска схемы ?


Продолжение будет.

------------ Дoбавленo в 18.41:
Идем дальше:

Add(FileSearch,16474504,343,161)
{
Ext="hi*.*"
SubDir=1
link(onSearch,10307410:doPart,[])
}
Add(FilePart,10307410,385,161)
{
}
откуда уверенность, что FileSearch не найдет здесь какой нибудь hi???????.exe или, к примеру, hiasm.exe Я не уверен.
Дальше FilePart добросовестно отработает все три линка до конца.


------------ Дoбавленo в 21.45:
nesco, а может быть сделать раздельно
FilePartPath
FilePartName
FilePartExt


------------ Дoбавленo в 21.47:
Имел ввиду раздельные компоненты.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 2a2.png [10.2KB] [345], a3.png [2.4KB] [326]
Разработчик
Ответов: 26151
Рейтинг: 2127
#55: 2009-06-18 00:48:55 ЛС | профиль | цитата
Tad писал(а):
В чем смысл этого куска схемы ?

А это чтобы папки только кидать, а не файлы. На файлы получишь бублик

Tad писал(а):
Имел ввиду раздельные компоненты

А есть ли в этом смысл

Tad писал(а):
к примеру, hiasm.exe

А что, оно потом найдет asm.hic

Насчет глюка с Delphi, то я не знаю, попробую на оригинальной версии
------------ Дoбавленo в 00.50:
С Delphi прикол в DoubleBuffered у таблицы (про что я и писал, что возможны проблемы)
------------ Дoбавленo в 01.06:
Вот, немного подправил (hiasm.exe не читает )
карма: 22

0
файлы: 1creator_his_from_hic_002.sha [11.8KB] [152]
Ответов: 16884
Рейтинг: 1239
#56: 2009-06-18 10:01:10 ЛС | профиль | цитата
nesco писал(а):
А что, оно потом найдет asm.hic

не найдет, но дотанцует аж до поиска asm.hic, записав по дороге def-иконку .

002 бегло посмотрел. Вроде все нормально.

nesco писал(а):
Tad писал(а)Имел ввиду раздельные компоненты
А есть ли в этом смысл
А черт его знает, но если нужно считать только расширение, то знаешь сколько он (компонент) лишних кодов перекрутит ?
Или борьба за минимальный вес программы уже не актуальна ?
Можно сделать по типу структуры конвертора.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#57: 2009-06-18 10:25:23 ЛС | профиль | цитата
Tad писал(а):
то знаешь сколько он (компонент) лишних кодов перекрутит ?

Там крутить-то нечего.
Tad писал(а):
Можно сделать по типу структуры конвертора

Ну это уж совсем лишнее. Ну был простенький компонент, скажи -- нафига его дисретизировать на мелкие кусочки
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#58: 2009-06-18 11:12:10 ЛС | профиль | цитата
nesco писал(а):
Ну был простенький компонент
который выдает события, а то что события не в том порядке, который мне нужен, то это ерунда, решаемая парой-тройкой-пятеркой и т.д. добавочных компонент.
Если б ты на этот случай создавал IC - 100% ты бы сначала проверил расширение.
Прокхали...
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#59: 2009-06-18 11:33:30 ЛС | профиль | цитата
Tad писал(а):
который выдает события, а то что события не в том порядке, который мне нужен

Во, об этом я и не подумал. Действительно, такое присутствует
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#60: 2009-06-18 11:37:22 ЛС | профиль | цитата
Tad писал(а):
Можно сделать по типу структуры конвертора.
и свободно ставить в том порядке и с Mode только те, которые нужны
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)