CftClub.ru
Клуб специалистов ЦФТ-Банк

Кнопка Обзор в «Экспорт-импорт файлов»

 
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Справочник PL/PLUS: Функции, примеры, приёмы
Предыдущая тема :: Следующая тема  
Автор Сообщение
Volod
Эксперт


Вступление в Клуб: 19.09.2007
СообщениеВт Дек 22, 2009 10:18   Кнопка Обзор в «Экспорт-импорт файлов» Ответить с цитатой
Полезность: Нет оценки
Захотелось вместо трех точек на кнопках "Маска файлов источника/приемника" видеть слово, например, "Обзор". В лоб Caption кнопки не меняется. Решение - меняем ValidateName на TextN, где N - свободный номер, и в клиент-скрипте присваиваем TextN.Caption="Обзор".
ALEX_DV
Участник


Вступление в Клуб: 26.02.2010
СообщениеПт Фев 26, 2010 12:39   Re: Кнопка Обзор в «Экспорт-импорт файлов» Ответить с цитатой
Полезность: 2
Альтернатива.
Если вам необходимо выбрать ТОЛЬКО папку, то есть неплохой способ.
Кидаете на форму кнопку (напрмер, Btn_PATH).
В клиент-скрипте пишем:
Код:

sub Btn_PATH_OnClick
   Set objShellApp = CreateObject("Shell.Application")
   Set objFolder = objShellApp.BrowseForFolder(0, "Выбор каталога", 1)
   If objFolder is nothing or Err.Number <> 0 Then
      MsgBox "Папка не выбрана!", vbInformation, "Импорт справочника террористов OFAC"
   else
      Text_PATH = objFolder.Self.Path      
      'вызов функции поиска файла в директории (если нужно)
      Set objShellApp = nothing
   End If
end sub

Text_PATH - поле от структуры "импорт-экспорт".

Такой вариант подходит, когда имя файла стандартизированно и его можно найти программно и не озадачивать пользователя выбором одного из 512 файлов. Также, иногда необходимо выбирать ТОЛЬКО папку, а ч/з "импорт-экспорт" это не совсем интуитивно понятно конечному пользователю, т.к. "импорт-экспорт" открывает итменно диалог выбора файла.

Параметры BrowseForFolder:
1ый: Дескриптор родительского окна (0);
2ой: Заголовок окна;
3ий: Параметры диалогового окна.
-1 Отобразит "Рабочий стол" и "Мои документы" с файлами. Имеется возможность создания новой папки.
0 Будут видны все папки и будет возможность создания папки (кнопка). Корзина видна.
1 Будут видны все папки и будет возможность создания папки (кнопка). Корзина не видна;
4ый: Определяет, выше какой папки пользователь не сможет подняться в дереве папок (необязательный).
German
Профи


Вступление в Клуб: 25.06.2007
СообщениеСб Фев 27, 2010 09:41   Re: Кнопка Обзор в «Экспорт-импорт файлов» Ответить с цитатой
Полезность: Нет оценки
ALEX_DV пишет:
Если вам необходимо выбрать ТОЛЬКО папку...


Не забывайте, это можно удобно сделать через объект "экспорт-импорт файлов"

http://www.cftclub.ru/viewtopic.php?t=15

Volod пишет:
Чтобы выбирать кнопкой в структуре Экспорт-импорт файлов не только файлы, но и папки, достаточно проинициализировать P_FILE.[SRC_NAME] любым непустым значением, например '0', и наличие файла в выбираемой папке необязательно.

_________________
Homo homini
Показать сообщения:   
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Справочник PL/PLUS: Функции, примеры, приёмы Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Рейтинг@Mail.ru