Foxtrot, можешь уже и 'двухколёсный лэндровер' скачать и пробовать! Я его в виде архива выложил. Может и тебе пригодится когда нибудь..

Да не надо "покоробило". Это здесь объект FileDialog для кого-то дикость, так и одичать недолго.
Этот объект входит в объектные модели приложений MS Office:
msdn.microsoft.com
В VBA эти "лэндроверы" обкатаны: www.sql.ru
Коды легко перекладываются на VFP.



Исправлено 3 раз(а). Последнее : lulgu, 10.11.17 18:19

descent52_tmp
Ну и вот последний 'двухколёсный лэндровер'. Качаем, на диске С распаковываем и запускаем prg.
[attachment 28533 Test_OpenFiles.rar]

Только сейчас на эти ваш пример обратил внимание.
Хоть ИК обещал научить вас работать с Winapi, но что-то застеснялся - он ведь такой стеснительный.
Не вникал насколько оправданы сделанные вами изменения, но работу по упрощению этого класса вы выполнили процентов на десять.

Если хотите продолжать.
Для начала перенесите код из LoadDLLs в начало метода DialogHandler, а код из ClearDLLs - в конец.
Это позволит методы ShowDialig, LoadDLLs, ClearDLLs сделать ненужными.

А если нет MSO, а есть ,например, OO?

значит пора копить денюшек на новый комп

Непонятно, с чего вообще весь сыр-бор.
Может кому-то надо и офисовский механизм. Может кому-то не надо. У каждого свое как бы.

vic7tar
А если нет MSO, а есть ,например, OO?

Все подобное в принципе можно делать и вообще без использования каких-то сторонних вещей, требующих регистрации и прочего, если подобное допустим вызывает проблемы, как у автора топика - т.е. вообще на чистом фоксе.
Причем ненамного сложнее.
Навскидку такой вариант: показывается грид, в который кнопкой "Добавить" по одному добавляются файлы через стандартный диалог GETFILE. Ничего страшного, что не множественное сразу. Большинство пользователей вообще тупо не умеют делать множественный выбор.
А выбирать по одному - это для всех понятно.
Вдобавок появляются плюсы работы со списком выбранного - можно добавить к нему кнопку "Удалить" (из списка или вообще, при необходимости), или если важен порядок выбора - "Переместить вверх-вниз" и т.п. Можно сделать в гриде отображение скажем размера файла, даже при желании текстового заголовка файла, если таковой имеется. Ну и в целом настроить как угодно.





Исправлено 2 раз(а). Последнее : Crispy, 13.11.17 07:06

lulgu
Если хотите продолжать...

Спасибо, lulgu, за поддержку, за внимание к теме...
Но продолжение оставлю как нить на потом...на новогодние праздники, не раньше.
Счас надо вести оперативную борьбу с системой Гис-Жкх, будь она неладна!

Crispy, всё можно сделать, и по одному выбирать и кнопки всякие прицепить, но когда файлов несколько десятков (форма 9У, может кто слышал) и их имена отличаются, порой, двумя последними
буквами, то, кажется, проще выделить их всех скопом и нажать кнопку Открыть. А потом 5-10 сек. на обработку и всё готово!
Счёт времени в отчётный период, порой, идет на секунды, кому хочется после работы оставаться?

descent52_tmp
но когда файлов несколько десятков (форма 9У, может кто слышал) и их имена отличаются, порой, двумя последними
буквами, то, кажется, проще выделить их всех скопом и нажать кнопку Открыть.

Ну ситуации разные бывают понятно. Хотя если разница только в конечных символах имен - можно и по маске в принципе организовать вышеописанным способом тоже (ну это прежде всего к вопросу выше об отсутствии МСО). Все зависит от желаемого результата при наличии каких-то условий. Ну и чтобы оно в итоге таки стабильно работало везде, где надо.

descent52_tmp
Счас надо вести оперативную борьбу с системой Гис-Жкх, будь она неладна!

Так Hel!Riser тоже погряз в этом ГИС-ЖКХ...

Crispy
Может кому-то надо и офисовский механизм.

Конкретно этот офисный механизм нужен при работе в офисе - для его макросов. Ну и для "программ" писанных на VBA в Access.
Мультивыбор файлов, конечно же, можно и "самодельный" замутить - вариантов тьма. Особенно если речь про файлы с "шаблонными" именами. Тут даже можно сделать лучше чем штатный виндовый диалог. Он то не позволяет выбирать файлы из разных папок, да и сам механизм выбора действительно рассчитан на PowerUser, а не на типичную "тётку-бухгалтера". Собрать все эти имена файлов из нужных папок и подпапок в тот же курсор, показать в гриде с колонкой чекбоксов, или в листбоксе (там чуть проще реализуется мультивыбор мышкой) с теми же чекбоксами - чем плохо то?

А сыр-бор из простого факта - я сильно поразился выбранному решению, т.к. считаю его попросту неадекватным. Тут и попёрли какие-то обиды и попытки доказать что это другие решения плохи, а "через ворд" - самое оно

Igor Korolyov
Собрать все эти имена файлов из нужных папок и подпапок в тот же курсор, показать в гриде с колонкой чекбоксов, или в листбоксе (там чуть проще реализуется мультивыбор мышкой) с теми же чекбоксами - чем плохо то?

Ну про "собрать все сразу", в принципе я тоже примерно и имел в виду. Особенно, если есть конкретная маска - без дополнительных диалогов, можно просто молча выбирать все по маске, например хоть в цикле перечисления, скажем используя с подстановкой параметров команду LOCFILE(), ну или еще как-то, возможно более оптимально. И затем, выведя все найденное в гриде, чтобы вообще не лазить по папкам, позволить просто поудалять из грида ненужное, если такое есть.
Если бы мне нужно было решать что-то подобное, вероятно как-то так бы и сделал.

Но с другой стороны, как довелось иногда убеждаться, в разных ситуациях бывают и какие-то свои нюансы, к которым возможно подходят и какие-то другие решения. Трудно "издалека" так сходу и наверняка сказать что-то о чем-то нестандартном. Когда есть возможность вникнуть в саму структуру со всякими местными нюансами, тогда видимо да.
Хотя все равно в любом случае - каждый чаще решает в итоге, как посчитает для себя нужным.