Вверх ↑
Ответов: 2253
Рейтинг: 676
#1: 2021-03-10 20:32:41 ЛС | профиль | цитата
Как вариант:
Add(MainForm,2953706,259,119)
{
Width=649
Height=502
Position=1
}
Add(ListBox,7205519,413,182)
{
Top=30
Width=640
Height=415
link(onClick,4434697:doGetString,[])
}
Add(StrList,4434697,455,161)
{
Point(doGetString)
Point(onGetString)
link(onGetString,566937:doText,[])
}
Add(Button,13670513,259,175)
{
Top=5
Width=135
Caption="Добавить"
link(onClick,4204658:doExecute,[])
}
Add(Hub,12496917,343,175)
{
link(onEvent1,4434697:doAdd,[(367,181)(367,167)])
link(onEvent2,12138498:doPart,[])
}
Add(Label,566937,497,168)
{
Top=450
Width=630
}
Add(ODialog,4204658,301,175)
{
link(onExecute,12496917:doEvent1,[])
}
Add(FilePartElm,12138498,371,182)
{
Mode=2
link(onPart,7205519:doAdd,[])
}
В одном списке хранятся только названия файлов, во втором полный путь. При клике на строке названия файла, по её индексу получаем строку с тем же индексом из второго списка полного пути к файлу.
карма: 11

0
Редактировалось 1 раз(а), последний 2021-03-10 20:36:16