ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Создание таблицы из файла
5 сообщений из 5, страница 1 из 1
Создание таблицы из файла
    #32483664
Bastard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bastard
Гость
Доброе время суток !
Подскажите пожалуйста как сделать чтобы создать свободную таблицу из файла (dbf) и присобачить ее к проекту.

Мне нужно программно сделать тоже самое, что делаешь когда в окошке броузера проекта, выбираешь Add... когда указатель находится на свободных таблицах.

Я вызываю Fname = GetFile('dbf'), получаю путь файла, а вот как дальше присобачить этот файл как свободную таблицу не знаю *( очень важно сделать это именно программно, т.е. сдеать что-то типа dialogbox'а добавления таблицы в проект !
Подскажите пожалуйста !
...
Рейтинг: 0 / 0
16.04.2004, 08:26
| Ответить | Цитировать | Написать  
Создание таблицы из файла
    #32483725
Вячеслав Клепинин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вячеслав Клепинин
Гость
Получить имя таблицы и открыть её:
Код: plaintext
1.
2.
3.
fname = GETFILE('DBF')
IF !EMPTY(fname)
   USE (fname) in  0 
ENDIF

Это нужно?
...
Рейтинг: 0 / 0
16.04.2004, 09:32
| Ответить | Цитировать | Написать  
Создание таблицы из файла
    #32483771
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Для работы с проектом используется объект ActiveProject.
Для добавления в проект файлов и изменения их принадлежности к определенной группе файлов в проекте используется коллекция Files()

Т.е. получается что-то вроде:

Код: plaintext
1.
2.
3.
4.
5.
LOCAL loFile, lcFileName
lcFileName = GETFILE('DBF')
* Добавляем файл в активный в данный момент проект
loFile = _VFP.ActiveProject.Files.Add(m.fname)
* Устанавливаем признак принадлежности к группе  "Free Tables" 
m.loFile.Type= "D"


Ссылку на нужный файл в проекте можно также получить по его имени с расширением

loFile = _VFP.ActiveProject.Files(JustFName(m.lcFileName))
...
Рейтинг: 0 / 0
16.04.2004, 09:56
| Ответить | Цитировать | Написать  
Создание таблицы из файла
    #32483880
Bastard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Bastard
Гость
2Владимир:
у меня ругается на m.fname в этом месте:
loFile = _VFP.ActiveProject.Files.Add( m.fname )
говорит что переменная fname не найдена !

и не могли бы вы рассказать что это за конструкция m.fname ??
...
Рейтинг: 0 / 0
16.04.2004, 10:58
| Ответить | Цитировать | Написать  
Создание таблицы из файла
    #32483961
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Ну, опечатка же. Можно было догадаться :)

Ты же записываещь имя выбранного файла в переменную lcFileName, значит эту переменную и надо использовать в методе ADD. Ну, или так

loFile = _VFP.ActiveProject.Files.Add(GetFile('DBF'))
...
Рейтинг: 0 / 0
16.04.2004, 11:32
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Создание таблицы из файла
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]