Вверх ↑
Ответов: 32
Рейтинг: -2
#1: 2018-03-23 19:57:00 ЛС | профиль | цитата
Можно пожалуйста спросить!
Меня всегда интересовал компонент

Add(Finder,1022904,560,203)
{
Расширение="*.txt"
Папка=""
}
при его использовании приложение вылетало! Я покопался в пакете Delphi и нашел его как схему без MainForm

Add(MultiElement,15071255,91,59)
{
@Hint=#11:Поиск папок|
}
BEGIN_SDK
Add(EditMulti,14838,3,3)
{
EventCount=1
WorkCount=1
Width=265
Height=158
link(doWork1,40289:doSearch,[(54,9)(54,111)])
}
Add(Memory,15595,84,35)
{
@Hint=#36:Расширение=расширение искомых файлов|
Default=String(*.txt)
}
Add(FileSearch,40289,105,105)
{
Ext=""
MakeExt(Dir,директория в которой необходимо найти файлы,Папка)
link(onSearch,14838:onEvent1,[(192,111)(192,9)])
link(Ext,15595:Value,[(111,86)(90,86)])
}
Add(Icon,6000902,217,105)
{
@Hint=#5:#main|
Icon=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0338C8251300A46015EF07F150AA28A21641B356A0E7DE26B88823F270D805805813D0A18FEFCFFC3F0CFFF0FC3EFFFFF193E02F10F20FE53FF9FE19FFD7F86FFF240DC50CFF0FF803D10CB63E20740F10F4079A01E100600107B8243]
}
END_SDK

Мне стало интересно я сделал свой элемент

Add(MultiElement,15071255,84,80)
{
@Hint=#11:Поиск папок|
}
BEGIN_SDK
Add(EditMultiEx,16391711,21,21)
{
WorkCount=#31:doLoad=Загружает файл с данными|50:doRead=Читает данные и выдаёт новую строку в поток|31:doSave=Сохраняет данные в файле|
EventCount=#22:onData=Получает данные|
VarCount=#19:Array=Массив данных|29:Index=Индекс строки с данными|
DataCount=#28:FileName=Имя файла с данными|
link(doLoad,5404876:doLoad,[(53,27)(53,90)])
link(doRead,466591:doEnum,[(53,34)(53,167)])
link(doSave,5404876:doSave,[(53,41)(53,97)])
link(Array,4343068:Var2,[(27,161)(104,161)])
link(Index,466591:Index,[(34,207)(153,207)])
}
Add(Icon,6000902,168,63)
{
@Hint=#5:#main|
Icon=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0338C8261081AB08A1E38708072A3C83204DD28E20DE1E3E3C365147E43D0346A6B6B931726B8346233A481F8B0C03416D525A8463534E0D268626242420C02CD811985A6D1CECE8EB8386C40760CA646777777620D4135074D6360602079E6A0698C8A8A22C93BB834A6A4A49097E8D134E6E6E69697973734909054808A815A801A47CB3562C0FFFFFF51F0F1FF8F196EFEF9CD70E3C76F863B85BF19EE29FF66B8CF0EC4FD207A37C3056569860B05DC0CD72AA419EE555833DC29B066B87FA09AE1FEC3DF60BDE8E6010094876FB4]
}
Add(StrList,5404876,84,56)
{
link(FileName,16391711:FileName,[(97,38)(27,38)])
}
Add(ArrayEnum,466591,140,161)
{
link(onItem,16391711:onData,[(246,167)(246,27)])
link(onEndEnum,466591:doStop,[(184,174)(184,162)(128,162)(128,174)])
link(Array,4343068:Var1,[(146,124)])
}
Add(GetDataEx,4343068,105,123)
{
link(Data,5404876:Array,[])
}
END_SDK

Но и при каком либо взаимодействии с ним программа закрывалась !
ЧТО ЭТО ТАКОЕ ВООБЩЕ?Это какой то способ добавления своих Элементов ? И почему ничего не работает ? ОООООЧЕНЬ ИНТЕРЕСНО!

--- Добавлено в 2018-03-23 20:10:41

Я немного поэксперементировал и заметил что
Add(MainForm,2953706,21,105)
{
link(onCreate,633960:doWork1,[(86,125)(86,111)])
}
Add(BOXEASY,633960,119,105)
{
link(onEvent1,7555274:doEvent,[(163,111)(163,125)])
}
Add(Label,9162341,196,7)
{
Left=195
Top=5
}
Add(Debug,7555274,175,119)
{
link(onEvent,9162341:doText,[(191,125)(191,13)])
}
Он добавляет несуществующий элемент! (Точнее элемент который я сделал)
Но я думал что просто создаются закладки на небольшие схемки!
А такое (Закладки схемок-контейнеров) можно реализовать ?
карма: -2
cschanell
0
Редактировалось 1 раз(а), последний 2018-03-23 20:10:41