Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблемы с с озданием *.dbf [D5, dBase, FoxPro]


ziper ©   (2002-08-06 12:43:00) 

У меня следующая проблема: создаю из под дельфей таблицу dbf, а в ней проставляются все типы полей, кроме вещественного. Т.е. открываю таблицу Database Desktop"ом, смотрю ее структуру и все как надо, кроме тех полей, которым я указал при создании вещественный тип. Они почему-то типа Type. А когда пишу в них вещественные числа, в поле записывается только его целая часть. Помогите. Может быть встречались с такой фигней. Вот кусок кода по созданию таблицы:

procedure TMainForm.CreateTable(TableFields: array of byte; FieldsCount: byte);
var i: integer; //Переменная общего назначения
begin
with MainForm.MeaTable do //Определяем структуру таблицы
begin
Close; //Закрываем таблицу
DatabaseName:=ExeName+"DB\";
TableName:="temp"; //Указываем имя таблицы
TableType:=ttDBase; //и определяем ее тип
FieldDefs.Clear; //Удаляем старую структуру
FieldDefs.Add("XCOORD",ftFloat); //Добавляем поле X-координаты
FieldDefs.Add("YCOORD",ftFloat); //Добавляем поле Y-координаты
//Создаем поля BS
for i:=0 to FieldsCount-1 do
FieldDefs.Add("F"+IntToStr(TableFields[i]),ftFloat);
FieldDefs.Add("MAX",ftFloat); //Добавляем в конец поле максимального уровня сигнала
IndexDefs.Clear; //Очищаем описание индексных полей
MainForm.MeaTable.CreateTable; //Создаем таблицу
Open; //и открываем её
end;
end;


Mike Kouzmine   (2002-08-06 13:02:00) [1]

Precision есть такое св-во. Попробуй с ним. Правда в хелпе говориться, что это для BCD, но я открыл DBF ную таблицу и при типе float оно доступно


Наверх

Титульная страница Поиск, карта сайта Написать письмо