Выгрузка из формы в DBF файл

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Grom
Местный житель
Сообщения: 276
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Северо-Запад Много

Выгрузка из формы в DBF файл

Сообщение Grom »

Подскажите если кто пробовал возможно-ли в ФОРМАХ ипользовать функции типа DBFOpen DBFAddField DBFGetFirst и т.п. осуществить создание, открытие и модификацию DBF-файла: некоторые функции проходят, но результата не дают. Например DBFOpen файл открывает, а создать новый не может.
Или может как-то по другому решить вопрос:
Необходимо осуществить выгрузку прайс листа в DBF-файл (5 полей), причём одно поле вычисляемое.
Подход к делу: СДЕЛАЛ и ... ЗАБЫЛ, а ОНО пусть САМО работает (не люблю возвращаться и повторяться).
m0p3e
Местный житель
Сообщения: 1386
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва

Re: Выгрузка из формы в DBF файл

Сообщение m0p3e »

Нормально работает в формах.
.var
hDBFh : LongInt;
.endvar
Создаем файл
hDBFh := DBFOpen('C:\PriblDBF.dbf',stCreate);
Описываем структуру
DBFAddField(hDBFh,'dNakl' ,dbDate,10 ,0);
DBFAddField(hDBFh,'nNakl' ,dbChar,20 ,0);
DBFAddField(hDBFh,'Price' ,dbNum ,20 ,20);
Пишем данные
DBFPutFieldValue(hDBFh,'dNakl' ,Дата_накладной);
DBFPutFieldValue(hDBFh,'nNakl' ,Номер_накладной);
DBFPutFieldValue(hDBFh,'Price' ,Цена);
DBFInsertRecord(hDBFh);
Grom
Местный житель
Сообщения: 276
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Северо-Запад Много

Re: Выгрузка из формы в DBF файл

Сообщение Grom »

Спасибо !
Всё заработало...
Подход к делу: СДЕЛАЛ и ... ЗАБЫЛ, а ОНО пусть САМО работает (не люблю возвращаться и повторяться).
Ответить