Вверх ↑
Ответов: 2059
Рейтинг: 131
#1: 2020-05-19 11:04:03 ЛС | профиль | цитата
1. Наверное схема должна быть такой:
Add(MainForm,13425340,343,133)
{
Width=273
Height=438
}
Add(WinExec,36387,504,133)
{
@Color=5614335
link(FileName,5448776:String,[(510,117)(433,117)])
}
Add(ListBox,5448776,406,56)
{
Left=5
Top=5
Width=245
Height=380
Align=5
Point(String)
Point(onDblClick)
link(onDblClick,36387:doShellExec,[(471,76)(471,146)])
}
Add(Button,14386141,301,56)
{
Width=255
Align=2
Caption="Открыть файл"
link(onClick,13098719:doExecute,[])
}
Add(ODialog,13098719,350,56)
{
link(onExecute,5448776:doAdd,[])
}

2. Нужно копаться в методах COM-объектов проводника, или Total Commander для выделения, или как Nic предложил.
Сейчас у тебя с запуском explorer.exe получается масло масляное.
карма: 6

0
Редактировалось 1 раз(а), последний 2020-05-19 11:07:16