Перекройте у String-Edit, наследованного от EDT FileNameOpen, метод lookup и больше ничего программировать не надо.
PHP код:
public void lookup()
{
str s;
container conFilter = ["Файлы Excel (*.xls)", "*.xls"];
;
s = Winapi::getOpenFileName(
element.hWnd(),
conFilter,
"", //initialPath,
"Укажите файл в формате Excel",
'',
""
);
StringEdit.text(s);
}
Если у Вас StringEdit привязан к полю в Датасурсе, то вмето StringEdit.text(s) надо написать
PHP код:
MyTable.MyField = s;
MyTable_DS.refresh();