Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 26067
Рейтинг: 2121
#166: 2008-05-11 00:17:10 ЛС | профиль | цитата
Андрей. писал(а):
Быть может ещё более усовершенствованное

Что-то мне подсказывает, что вряд ли что-то кардинально изменится, а если изменится, то только если изменится сама глобальная концепция, но она уже претерпела усовершенствовани в предыдущих версиях.

Андрей., я гляжу, что только ты один упертый остался (меня, лично, поражает твоя упертость), остальные уже давно пасутся на SVN, ну, как знаешь -- не хочешь, как хочешь.
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#167: 2008-05-11 00:34:10 ЛС | профиль | цитата
Леонид, это просто неправильное применение слова "текущая".
Если не обновляться с SVN (каждый день!) , то это просто HiAsm 3.65 build 168 (стоящий на одном месте, а не текущий), а у меня обновление каждый день в 8.00 - вот это текущий (изменяющийся).
Приенять слово "текущий" к статике - абсурд.

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 8888
Рейтинг: 823
#168: 2008-05-11 09:53:01 ЛС | профиль | цитата
Tad, есть, что ответить, но не буду, а то "забанят за флуд", лучше пойду на SVN
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#169: 2008-05-11 12:26:40 ЛС | профиль | цитата
Андрей., в "компонентах" есть "Triada" скачай и замени конвертор
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 3851
Рейтинг: 159
#170: 2008-05-11 13:31:19 ЛС | профиль | цитата
Что-то не нашёл я этих триад по быстрому, проверил без него - трёхзнаки разлагает правильно
карма: 0
начавший
0
Разработчик
Ответов: 26067
Рейтинг: 2121
#171: 2008-05-11 13:46:14 ЛС | профиль | цитата
Андрей. писал(а):
Что-то не нашёл я этих триад по быстрому

Если используется новый компонент, то в нем есть метод конвертации StrToTri (он в конце списка)

карма: 22

0
Ответов: 16884
Рейтинг: 1239
#172: 2008-05-11 16:27:01 ЛС | профиль | цитата
Андрей., Бери здесь http://www.hiasm.com/xf//getfile/8620
------------ Дoбавленo:

nesco писал(а):
Если используется новый компонент
он же без SVN. Откуда у него новый?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 3851
Рейтинг: 159
#173: 2008-05-11 18:29:37 ЛС | профиль | цитата
Этому "Tri-ada" не помешает свойство - направление разбивки. Скажем для телефонов было бы логичнее не так как сейчас а наоборот, чтобы последней читалась оставшаяся одна цифра..
карма: 0
начавший
0
Ответов: 5227
Рейтинг: 587
#174: 2008-05-11 19:36:08 ЛС | профиль | цитата
К этюдам конечно не какого отношения не имеет но думаю может кому нибудь пригодится. Библиотекa алгоритмов по программированию+программа построения блоксхем с экспортом в паскаль, случайно наткнулся в интернете. Алгоритмы показались довольно позновательными. http://slil.ru/25777384 - 765Kb
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 3851
Рейтинг: 159
#175: 2008-05-11 21:41:57 ЛС | профиль | цитата
andrestudio писал(а):
программа построения блоксхем с экспортом в паскаль
так там и блок-схемы строятся с учётом синтаксиса паскаля, т.е. без знания языка не обойтись..

Вот бы в хиасм такой редактор блок-схем, только не привязанный к паскалю. Чтобы можно было соорудить нечто быстрое, без знания языков программирования, а только правил построения блок-схем.. Собственно HiAsm и есть аналогия такого процесса, только элементы в нём подобраны и выглядят по другому. Также может быть полезен экспорт SHA в блок-схему (кому курсовую сделать, а кому и документацию к производственному проекту подготовить) - сделал на HiAsm, экспротировал в блок-схему и можно показывать программистам на других языках - все поймут (найдут ошибку / помогут исправить). Некий мостик с остальным миром.
По поводу скорости работы такой штуки - не могу рассуждать (не знаю), могу лишь предполагать, что будет быстрее, но возможно не быстрее FTCG.
карма: 0
начавший
0
Ответов: 5227
Рейтинг: 587
#176: 2008-05-20 15:46:25 ЛС | профиль | цитата
Андрей. - ну ты фантазёр

[size=-2]------ Добавлено в 14:04
Форточка для подсказок

code_2222.txt
------------ Дoбавленo:

CheckBox и RadioButton из Label, вдруг кому и пригодится

схему косит, придётся плющить
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
1
файлы: 1code_2222.txt [6.4KB] [631]
Голосовали:Валерий
Гость
Ответов: 17029
Рейтинг: 0
#177: 2008-05-20 23:28:11 правка | ЛС | профиль | цитата


Редактировалось 6 раз(а), последний 2022-04-03 07:57:16
карма: 0

0
Ответов: 3851
Рейтинг: 159
#178: 2008-05-27 15:03:28 ЛС | профиль | цитата
Кнопка с фиксацией из TabControl (наверное уже была где-то): code_9149.txt
Ограничение: не работает TabOrder
------------ Дoбавленo:

Настройка списка страниц TabControl:

Add(MainForm,10628028,7,189)
{
Left=20
Top=105
Width=380
Height=302
link(onCreate,1814245:doEvent1,[])
}
Add(TabControl,11392409,392,84)
{
Width=283
Height=30
Bitmaps=[]
Buttons=0
Point(PageDelete)
Point(CurTabCaption)
Point(PageTab)
link(onChange,6854194:doEnum,[])
}
Add(ArrayEnum,2725476,336,84)
{
Type=1
link(onItem,11392409:PageInsert,[])
link(Array,6596147:Var3,[(342,72)])
}
Add(Button,9449600,231,126)
{
Left=105
Top=170
Width=70
Ctl3D=0
Caption="Применить"
link(onClick,14945298:doWork2,[])
}
Add(CheckBox,16228692,105,259)
{
Left=5
Top=60
Width=120
Ctl3D=0
Caption="один"
Point(onClick)
Point(doCaption)
link(onClick,3838545:doWork1,[(153,272)(153,342)])
}
Add(CheckBox,7665998,105,301)
{
Left=5
Top=77
Width=120
Ctl3D=0
Caption="два"
Point(onClick)
Point(doCaption)
link(onClick,3838545:doWork2,[(148,314)(148,349)])
}
Add(CheckBox,5878866,105,343)
{
Left=5
Top=94
Width=120
Ctl3D=0
Caption="три"
Point(onClick)
Point(doCaption)
link(onClick,3838545:doWork3,[])
}
Add(CheckBox,13237019,105,385)
{
Left=5
Top=111
Width=120
Ctl3D=0
Caption="четыре"
Point(onClick)
Point(doCaption)
link(onClick,3838545:doWork4,[(148,398)(148,363)])
}
Add(CheckBox,13585295,105,427)
{
Left=5
Top=128
Width=120
Ctl3D=0
Caption="пять"
Point(onClick)
Point(doCaption)
link(onClick,3838545:doWork5,[(153,440)(153,370)])
}
Add(ListBox,16250740,483,294)
{
@Hint=#28:порядок используемых страниц|
Left=130
Top=65
Width=75
Height=90
Point(doSelectString)
Point(Index)
Point(Value)
link(onChange,7946250:doReplace,[])
}
Add(GetDataEx,13386941,140,56)
{
link(Data,11891424:Array,[])
}
Add(IndexToChanel,14692920,252,336)
{
Point(Index)
link(onEvent1,39347:doEvent1,[])
link(onEvent2,16250740:doAdd,[(297,349)(297,300)])
link(Index,3838545:Data,[(258,324)(243,324)(243,384)(167,384)])
}
Add(DoData,7251739,399,308)
{
Data=Integer(0)
link(onEventData,16250740:doDelete,[])
link(Data,16250740:Index,[(405,303)(465,303)(465,358)(510,358)])
}
Add(Hub,39347,315,336)
{
link(onEvent1,16250740:doSelectString,[])
link(onEvent2,7251739:doData,[(370,349)(370,314)])
}
Add(Hub,1996771,287,126)
{
OutCount=3
link(onEvent1,7250844:doRepeat,[(348,132)(348,202)])
link(onEvent2,2725476:doEnum,[(327,139)(327,90)])
link(onEvent3,14608532:doWork1,[])
}
Add(ChanelToIndex,13059284,434,196)
{
link(onIndex,11392409:PageDelete,[(477,202)(477,183)(381,183)(381,97)])
}
Add(Repeat,7250844,385,196)
{
Type=5
Op1=Integer(0)
link(onRepeat,13059284:doWork1,[])
link(Op2,11392409:TabCount,[])
}
Add(ArrayEnum,14236727,98,84)
{
Type=1
link(onItem,3878236:doEnum,[])
link(Array,6596147:Var1,[(104,72)])
}
Add(Hub,1814245,49,203)
{
OutCount=4
link(onEvent1,619440:doEnum,[(86,209)(86,179)(21,179)(21,356)])
link(onEvent2,11599090:doRead,[(360,216)(360,356)])
link(onEvent3,14236727:doEnum,[(89,223)(89,90)])
link(onEvent4,14945298:doWork3,[(277,230)])
}
Add(Replace,7946250,532,294)
{
SubStr="
"
DestStr=","
link(onReplace,11599090:doWrite,[(578,300)(578,396)(361,396)(361,363)])
link(Str,16250740:Text,[(538,280)(526,280)(526,363)(489,363)])
}
Add(Ini,11599090,371,350)
{
FileName="test.ini"
Section="настройки"
Key="порядок страниц"
Type=1
link(onResult,8239362:doReplace,[])
}
Add(DoData,10978860,175,140)
{
Data=String(два)
link(onEventData,4433731:doEvent,[(216,146)(216,241)(30,241)(30,300)])
link(Data,3878236:Index,[(181,128)(160,128)])
}
Add(IndexToChanel,4433731,49,294)
{
Count=5
Point(Data)
link(onEvent1,16228692:doCheck,[(93,300)(93,265)])
link(onEvent2,7665998:doCheck,[])
link(onEvent3,5878866:doCheck,[(99,314)(99,349)])
link(onEvent4,13237019:doCheck,[(95,321)(95,391)])
link(onEvent5,13585295:doCheck,[(90,328)(90,433)])
link(Data,15395634:Value,[])
}
Add(ArrayEnum,3878236,147,84)
{
Type=1
link(onItem,7538134:doCompare,[(189,90)(189,123)(110,123)(110,146)])
link(Array,13386941:Var2,[])
}
Add(If_else,7538134,119,140)
{
link(onTrue,10978860:doData,[])
link(Op1,14236727:Item,[(125,128)(104,128)])
link(Op2,3878236:Item,[(132,128)(153,128)])
}
Add(ChanelToIndex,3838545,161,336)
{
Count=5
Point(Data)
link(onIndex,359930:doRead,[])
}
Add(Memory,15395634,49,245)
{
Default=Integer(1)
}
Add(StrList,11891424,133,7)
{
@Hint=#27:список существующих страниц|
Strings=#4:один|3:два|3:три|6:четыре|4:пять|
}
Add(Replace,8239362,413,350)
{
SubStr=","
DestStr="
"
link(onReplace,16250740:doText,[(471,356)(471,321)])
}
Add(ArrayRW,359930,203,336)
{
link(onRead,14692920:doEvent,[])
link(Array,14293154:Var2,[])
}
Add(GetDataEx,6596147,280,63)
{
Angle=2
link(Data,16250740:Array,[(293,386)(503,386)])
}
Add(HubEx,14945298,273,119)
{
link(onEvent,1996771:doEvent1,[])
}
Add(ArrayEnum,6854194,441,84)
{
Type=1
link(onItem,16713826:doCompare,[(486,90)(486,131)(387,131)(387,146)])
link(Array,14293154:Var3,[(447,65)])
}
Add(GetDataEx,14293154,196,56)
{
Angle=3
link(Data,13386941:Var3,[])
}
Add(DoData,2163706,448,140)
{
Data=String(два)
link(onEventData,6661333:doOperation,[])
link(Data,6854194:Index,[])
}
Add(If_else,16713826,399,140)
{
link(onTrue,2163706:doData,[])
link(Op1,11392409:CurTabCaption,[])
link(Op2,6854194:Item,[(412,125)(447,125)])
}
Add(Math,6661333,494,140)
{
OpType=9
Op1=1
ResultType=0
link(onResult,1181563:doBits,[])
}
Add(IntToBits,1181563,543,140)
{
Count=5
Data_0=Integer(0)
Data_1=Integer(1)
link(onBit1,11265239:doVisible,[(585,146)(585,90)])
link(onBit2,13181945:doVisible,[(589,153)(589,125)])
link(onBit3,6332098:doVisible,[])
link(onBit4,8040116:doVisible,[(589,167)(589,195)])
link(onBit5,14198901:doVisible,[(585,174)(585,230)])
}
Add(ChildPanelEx,8040116,602,189)
{
}
BEGIN_SDK
Add(EditMultiEx,12415523,21,21)
{
WorkCount=#9:doVisible|
link(doVisible,14884752:doVisible,[(28,27)(28,118)])
}
Add(Panel,14884752,35,105)
{
Left=280
Top=80
Color=65280
Visible=1
Point(doVisible)
}
END_SDK
Add(ChildPanelEx,14198901,602,224)
{
}
BEGIN_SDK
Add(EditMultiEx,9070206,21,21)
{
WorkCount=#9:doVisible|
link(doVisible,11856340:doVisible,[(28,27)(28,118)])
}
Add(Panel,11856340,35,105)
{
Left=280
Top=80
Color=16776960
Visible=1
Point(doVisible)
}
END_SDK
Add(ChildPanelEx,13181945,602,119)
{
}
BEGIN_SDK
Add(EditMultiEx,6887264,21,21)
{
WorkCount=#9:doVisible|
link(doVisible,6872777:doVisible,[(28,27)(28,118)])
}
Add(Panel,6872777,35,105)
{
Left=280
Top=80
Color=4227327
Visible=1
Point(doVisible)
}
END_SDK
Add(ChildPanelEx,11265239,602,84)
{
}
BEGIN_SDK
Add(EditMultiEx,4452000,21,21)
{
WorkCount=#9:doVisible|
link(doVisible,6678374:doVisible,[(49,27)(49,118)])
}
Add(Panel,6678374,77,105)
{
Left=280
Top=80
Color=255
Visible=1
Point(doVisible)
}
END_SDK
Add(ChildPanelEx,6332098,602,154)
{
}
BEGIN_SDK
Add(EditMultiEx,446447,21,21)
{
WorkCount=#9:doVisible|
link(doVisible,11521756:doVisible,[(28,27)(28,118)])
}
Add(Panel,11521756,35,105)
{
Left=280
Top=80
Color=65535
Visible=1
Point(doVisible)
}
END_SDK
Add(ChanelToIndex,14608532,336,140)
{
link(onIndex,11392409:PageTab,[(375,146)(375,104)])
}
Add(IndexToChanel,5445429,42,392)
{
Count=5
Point(Index)
link(onEvent1,16228692:doCaption,[(90,398)(90,272)])
link(onEvent2,7665998:doCaption,[(90,405)(90,314)])
link(onEvent3,5878866:doCaption,[(90,412)(90,356)])
link(onEvent4,13237019:doCaption,[(90,419)(90,398)])
link(onEvent5,13585295:doCaption,[(90,426)(90,440)])
link(Index,619440:Index,[])
}
Add(ArrayEnum,619440,35,350)
{
Type=1
link(onItem,5445429:doEvent,[(75,356)(75,387)(30,387)(30,398)])
link(Array,13386941:Var1,[(41,65)])
}
Add(InfoTip,4843820,182,2)
{
Info=#70:перед первым запуском сюда нужно внести 5 строчек с названиями страниц|
Width=162
Height=60
Margin=5
}
Add(InfoTip,12961787,112,2)
{
Info=#
Width=71
Height=60
}
карма: 0
начавший
0
файлы: 1code_9149.txt [3KB] [479]
Ответов: 5227
Рейтинг: 587
#179: 2008-05-30 22:57:32 ЛС | профиль | цитата
Андрей что закод такой? не могу понять ход твоих мыслей , ты некак уже начал хакеров запутывать?
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 3851
Рейтинг: 159
#180: 2008-05-31 11:34:19 ЛС | профиль | цитата
andrestudio, настройка списка страниц TabControl, нужна для того, чтобы юзер мог настроить для себя список страниц. Изначальный перечень их хранится в StrList, то есть создатель проги вписывает туда имена тех страниц которые он создал. При этом юзер может менять и порядок страниц, но при нажатии "один" всегда включится красная панель, какой бы по счёту ни была эта кнопка!
карма: 0
начавший
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)