Страница 1 из 1

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

Добавлено: 29 июн 2004, 13:25
Grom
Подскажите если кто пробовал возможно-ли в ФОРМАХ ипользовать функции типа DBFOpen DBFAddField DBFGetFirst и т.п. осуществить создание, открытие и модификацию DBF-файла: некоторые функции проходят, но результата не дают. Например DBFOpen файл открывает, а создать новый не может.
Или может как-то по другому решить вопрос:
Необходимо осуществить выгрузку прайс листа в DBF-файл (5 полей), причём одно поле вычисляемое.

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

Добавлено: 29 июн 2004, 14:11
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);

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

Добавлено: 30 июн 2004, 15:29
Grom
Спасибо !
Всё заработало...