Обновил до 2421 Перестал компилировать приложение с AdjustControls Поправки с шапки все внёс в HiAsm В HiAsm установлен RemoteAccessManager Вот лог Сама схема Make(delphi) ver(4.05 build 186) Add(AdjustControls,1891344,329,245) { } Add(Button,1124109,203,245) { Left=225 Top=80 link(onClick,2150137:doData,[]) } Add(Button,1102877,427,217) { Left=545 Top=15 Name="b1" AddHint(62,-39,27,13,Name) } Add(Button,1017741,427,266) { Left=545 Top=50 Name="b2" } Add(Button,14060833,427,315) { Left=545 Top=85 Name="b3" } Add(DoData,2150137,259,245) { link(onEventData,3294906:doWork2,[]) link(Data,13215217:Text,[]) } Add(StrList,13215217,259,168) { Strings=#15:b1=Caption=Name|14:b2=Caption=Age|18:b3=Caption=Country|15:s1=Caption=Name|16:e1=FontColor=Red| } Add(Button,106875,203,364) { Left=225 Top=120 link(onClick,8243158:doData,[]) } Add(DoData,8243158,259,364) { link(onEventData,3294906:doWork3,[(312,370)]) link(Data,15782353:Text,[]) } Add(StrList,15782353,259,287) { Strings=#14:b1=Caption=Имя|18:b2=Caption=Возраст|17:b3=Caption=Страна|14:s1=Caption=Имя|18:e1=FontColor=Black| } Add(HubEx,3294906,308,245) { link(onEvent,1891344:doSet,[]) } Add(Label,15863001,364,175) { Left=550 Top=120 Height=20 Name="s1" AddHint(51,-51,26,13,Name) } Add(InfoTip,3226484,595,70) { Info=#65:Брать настройки можно как из StrList так и указывать в компоненте|86:Приоритетные настройки из компонента (если будет настроено и в компоненте и в StrList,|37:примениятся настройки из компонента).|0:|25: Возможности компонента|73:1. Изменения позиции и габаритов: Отступ слева и справа, ширина и высота.|26:2. Выравнивание элементов.|18:3. Цвет элементов.|19:4. Шрифт элементов.|37:5. Доступность и видимость элементов.|51:6. Очистка элемента (удаление текста, строк и т.п.)|31:7. Установка фокуса на элемент.|48:8. Перенос элемента на задний или передний план.|24:9. Перерисовка элемента.|89:10. Текст в элементах: Заголовок в формах, текст в текстовом поле, строки в списке строк.|56:11. Установка и снятие значения у Checkboxи RadioButton.|43:12. Установка вкладок в элемент TabControl.|40:13. Установка цветов в элемент ColorBox.|41:14. Установка даты в элемент DDatePicker.|73:15. Установка колонок и строк в таблицы StringTable StringTableMTMTStrTbl|40:16. Установка текста и строк в ComboBox.| Font=[MS Sans Serif,10,1,16711680,1] HAlign=0 Width=715 Height=340 } Add(Edit,8894683,427,385) { Left=555 Top=155 Name="e1" } Add(ChildPanel,13973370,266,56) { } BEGIN_SDK Add(EditMulti,12349116,21,21) { } Add(Panel,14408072,35,105) { Left=35 Top=20 Width=180 Height=165 } END_SDK Add(MainForm,6539903,280,532) { Width=736 Height=643 link(onCreate,3682515:doConvert,[]) } Add(MST_ColAction,4139610,434,546) { Action=9 MaxColWidth=1000 Index=-2 MSTControl="tabl" } Add(MST_Load,571213,385,539) { Delimiter="\t" LoadCheckBoxes=0 MSTControl="tabl" link(onLoadFromStream,4139610:doColAction,[]) } Add(StreamConvertor,3682515,336,546) { Mode=7 Point(Data) link(onResult,571213:doLoadFromStream,[]) link(Data,6934679:Text,[]) } Add(StrList,6934679,336,490) { Strings=#42:Item Description Quantity Unit Price Value|66:0\t13930 Double-action Quickstart II rem. L=740mm 1 PC 98,66 98,66|56:0\t13100201 Spray gun for udder washer 20 PC 17,77 355,4|52:0\t13246007 COMBI-cock ш51 mm cpl. 10 PC 63,43 634,3|54:0\t25643301 Milk hose ш 24/14 x 2750 32 PC 9,76 312,32|59:0\t14291 Service no.1 RDS MAX double box 1 PC 250,51 250,51|57:0\t24144638 Spiral spring for tube filter 3 PC 43,2 129,6|43:0\t22121763 V-belt spz 1087 4 PC 5,91 23,64|64:0\tMH0015 Repair kit non-rotating cylinder ш40mm 8 PC 14,3 114,4|51:0\tGS9835 Revision set SAC Unipuls 4 PC 13,97 55,88|55:0\t22121735 El-motor 3,0kw 3x400v 1400 1 PC 186,4 186,4|58:0\t23544122 Carbon disc ш44,7/38,3x5,8mm 10 PC 16,92 169,2|58:0\t23544122 Carbon disc ш44,7/38,3x5,8mm 10 PC 16,92 169,2|57:0\t23544122 Carbon disc ш44,7/38,3x5,8mm 2 PC 16,92 33,84|67:0\t21200159 Top part UNIFL3/4 for steel bot.part 25 PC 30,09 752,25|60:0\t24400111 Hose f. pump compl. UNIWASH 153 PC 10,58 1618,74|61:0\t13225 Piston complete for valve UNIWASH3 4 PC 27,09 108,36|63:0\t12200105 Vacuumgauge glycerine ш100mm 3/8" 5 PC 40,57 202,85|0:| } Add(MTStrTbl,15214105,343,637) { Top=218 Width=720 Height=386 Align=4 Name="tabl" ColorItems=0 Redaction=0 CheckBoxes=0 Grid=0 Point(onBeforeLineChange) Point(onLineChange) Point(onMouseUp) link(onBeforeLineChange,8042369:doEvent,[]) link(onLineChange,12426016:doEvent,[(401,678)(401,685)]) link(onMouseUp,8844415:doEvent,[(391,685)(391,711)]) } Add(Debug,8042369,406,665) { LogCount=100 } Add(Debug,12426016,427,679) { LogCount=100 } Add(Debug,8844415,408,705) { } Add(TabControl,8424267,189,77) { Left=295 Width=225 Height=185 Tabs=#2:11|2:22|2:33|0:| Bitmaps=[] }
Редактировалось 3 раз(а), последний 2025-01-16 15:30:51
|