Вверх ↑
Разработчик
Ответов: 26315
Рейтинг: 2146
#1: 2025-08-03 13:50:22 ЛС | профиль | цитата
Ладно, пока вот так -- https://forum.hiasm.com/getfile/40598

Пример, на всякий случай
Схема

Add(MainForm,2953706,42,140)
{
Width=580
Height=500
Caption="ColorTable"
Position=1
Point(onKeyDown)
}
Add(ArrayEnum,10867382,224,245)
{
link(onItem,8476894:doSplit,[])
link(Array,2073113:Array,[])
}
Add(Hub,16456196,119,231)
{
InCount=2
OutCount=3
link(onEvent1,235600:doClear,[(144,237)(144,202)])
link(onEvent2,10867382:doEnum,[(214,244)(214,251)])
}
Add(MultiStrData,8476894,273,245)
{
Char="="
link(onPart1,10492467:doTrim,[(326,251)(326,146)])
link(onPart2,10430147:doTrim,[])
}
Add(Trim,10430147,329,252)
{
Char=";"
link(onTrim,9961426:doCopy,[])
}
Add(Copy,9961426,378,252)
{
Position=5
Count=6
link(onCopy,51021:doEvent1,[])
}
Add(Copy,6565334,504,182)
{
Count=2
link(onCopy,4983611:doValue,[])
}
Add(Hub,51021,434,252)
{
OutCount=3
link(onEvent1,6565334:doCopy,[(476,258)(476,188)])
link(onEvent2,13490066:doCopy,[(486,265)(486,230)])
link(onEvent3,14896559:doCopy,[])
}
Add(Copy,13490066,504,224)
{
Position=3
Count=2
link(onCopy,10482346:doValue,[])
}
Add(Copy,14896559,504,266)
{
Position=5
Count=2
link(onCopy,13132822:doString,[])
}
Add(FormatStr,13132822,567,266)
{
DataCount=3
Mask="%1%2%3"
Point(FString)
link(onFString,7780749:doConvert,[])
link(Str2,10482346:Value,[])
link(Str3,4983611:Value,[])
}
Add(Memory,4983611,581,182)
{
}
Add(Memory,10482346,574,224)
{
}
Add(Trim,10492467,504,140)
{
Char=" "
link(onTrim,13639368:doReplace,[])
}
Add(Memory,11135864,777,140)
{
}
Add(Convertor,7780749,616,266)
{
Mode=5
link(onResult,14621313:doEvent1,[])
}
Add(FormatStr,4371953,777,273)
{
DataCount=8
Mask="%8=%1=%2=%7=%5=%4=%3=%6"
link(onFString,14363550:doMTString,[])
link(Str1,11135864:Value,[])
link(Str3,4420109:R,[])
link(Str4,4420109:G,[])
link(Str5,4420109:B,[])
link(Str6,560770:EndIdxIcons,[(818,252)(936,252)(936,338)(1000,338)])
link(Str7,13132822:FString,[(825,261)(699,261)(699,310)(573,310)])
link(Str8,7216616:GetData,[])
}
Add(Convertor,6558578,735,273)
{
Digits=8
SymbolFill="0"
link(onResult,4371953:doString,[])
}
Add(Replace,13639368,581,140)
{
SubStr="acl"
link(onReplace,11135864:doValue,[])
}
Add(Hub,14621313,658,266)
{
link(onEvent1,4982551:doEvent1,[(694,272)(694,202)])
link(onEvent2,6558578:doConvert,[])
}
Add(ToRGB,4420109,791,217)
{
}
Add(EventFromData,7216616,826,112)
{
link(onEvent,1578733:doOperation,[])
}
Add(Math,1578733,875,112)
{
Op2=1
ResultType=0
link(onResult,7216616:doData,[(919,118)(919,106)(814,106)(814,118)])
link(Op1,10867382:Index,[(881,96)(265,96)(265,285)(237,285)])
}
Add(StrList,2073113,210,168)
{
FileName="ColorConstant.txt"
Strings=#38: aclAliceBlue = $FFF0F8FF;|38: aclAntiqueWhite = $FFFAEBD7;|38: aclAqua = $FF00FFFF;|38: aclAquamarine = $FF7FFFD4;|38: aclAzure = $FFF0FFFF;|38: aclBeige = $FFF5F5DC;|38: aclBisque = $FFFFE4C4;|38: aclBlack = $FF000000;|38: aclBlanchedAlmond = $FFFFEBCD;|38: aclBlue = $FF0000FF;|38: aclBlueViolet = $FF8A2BE2;|38: aclBrown = $FFA52A2A;|38: aclBurlyWood = $FFDEB887;|38: aclCadetBlue = $FF5F9EA0;|38: aclChartreuse = $FF7FFF00;|38: aclChocolate = $FFD2691E;|
Point(doLoad)
}
Add(MTStrTbl,3412059,252,455)
{
Left=5
Top=5
Width=555
Height=423
akRight=0
akBottom=0
Font=[Courier New,8,1,0,204]
HideFocus=0
Name="tabl"
DoubleBuffered=0
Columns=#5:ID=70|8:Name=125|8:Color=80|6:HEX=80|7:Blue=60|8:Green=60|6:Red=60|
SelectTextColor=255
SelectColor=12639424
FlatScroll=1
ColumnClick=1
HeaderDragDrop=0
RowDragDrop=0
CheckBoxes=0
Grid=0
SmallIconsManager="icons"
Point(Handle)
Point(onMouseMove)
Point(onMouseUp)
link(onClick,8857963:doSeparateMT,[(319,461)(319,419)])
link(onColumnClick,437380:doCase,[])
}
Add(MST_RowAction,7296923,896,259)
{
MSTControl="tabl"
}
Add(MT_String,14363550,847,259)
{
Delimeter="="
link(onResult,7296923:doRowAction,[])
}
Add(IconsManager,560770,980,266)
{
Name="icons"
ImgSize=32
Icons=[]
Point(EndIdxIcons)
}
Add(Hub,4982551,735,196)
{
OutCount=4
link(onEvent1,14329012:doCreate,[(953,202)(953,139)])
link(onEvent2,4682190:doData,[(953,209)(953,230)])
link(onEvent3,15126526:doAdd,[(943,216)(943,356)])
link(onEvent4,4420109:doGetRGB,[])
}
Add(Bitmap,14329012,980,119)
{
HWidth=20
HHeight=20
Point(doCreate)
Point(onCreate)
link(onCreate,1719533:doDraw,[(1048,125)(1048,188)])
}
Add(Icon,14341706,1029,210)
{
Transparent=65793
Point(doLoadFromBitmap)
}
Add(DoData,4682190,980,224)
{
link(onEventData,14341706:doLoadFromBitmap,[])
link(Data,6420969:Var2,[])
}
Add(ArrayRW,15126526,1015,336)
{
link(Array,560770:IconArray,[(1021,317)(986,317)])
link(Value,14341706:Icon,[])
}
Add(Img_Rectangle,1719533,1085,182)
{
Point(Point1)
Point(Point2)
link(Bitmap,6420969:Var3,[(1091,173)])
link(Point1,6621306:Point,[(1105,166)(1063,166)])
link(Point2,15381893:Point,[])
}
Add(GetDataEx,6420969,980,168)
{
link(Data,14329012:Bitmap,[])
}
Add(PointXY,6621306,1057,119)
{
}
Add(PointXY,15381893,1106,119)
{
X=20
Y=20
}
Add(MST_SortInCol,2218945,378,455)
{
MSTControl="tabl"
Point(doSortDigit)
}
Add(MST_DrawManager,5730419,203,455)
{
Name="draw"
IconSize=18
SingleString=0
LightTxtColor=16777215
}
Add(Button,16586322,42,238)
{
Left=5
Top=435
Width=115
akTop=1
akBottom=0
TabOrder=-1
Caption="LoadColorText"
link(onClick,16456196:doEvent2,[])
}
Add(Button,2946555,42,301)
{
Left=185
Top=435
Width=95
akLeft=1
akTop=1
akRight=0
akBottom=0
TabOrder=-1
Caption="LoadTable"
}
Add(Button,6212881,42,336)
{
Left=285
Top=435
Width=95
akLeft=1
akTop=1
akRight=0
akBottom=0
TabOrder=-1
Caption="SaveTable"
}
Add(Case,437380,329,462)
{
Value=Integer(3)
link(onNextCase,2218945:doSortDigit,[])
}
Add(Edit,12538303,434,413)
{
Left=465
Top=435
Width=95
akLeft=1
akTop=1
akRight=0
akBottom=0
Font=[Tahoma,8,1,0,204]
Cursor=1
Text=""
Alignment=2
}
Add(MT_MultiData,8857963,378,413)
{
From=2
Count=1
Point(Data)
link(onData1,12538303:doText,[])
link(Data,3412059:Select,[(384,404)(244,404)(244,509)(258,509)])
}
Add(StyleXP,14618349,42,189)
{
}
Add(MST_Clear,235600,154,196)
{
MSTControl="tabl"
}

карма: 22

0
файлы: 1MST_RowDragDrop_001.zip [29.1KB] [204]
Редактировалось 2 раз(а), последний 2025-08-03 13:52:31