Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.26;
Скачать: CL | DM;

Вниз

Проблемы с с озданием *.dbf   Найти похожие ветки 

 
ziper   (2002-08-06 12:43) [0]

У меня следующая проблема: создаю из под дельфей таблицу 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) [1]

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



Страницы: 1 вся ветка

Текущий архив: 2002.08.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
1-85093
lime
2002-08-14 22:58
2002.08.26
Символы в строках


14-85175
Феликс
2002-07-26 13:50
2002.08.26
Кто уважает мужчину по имени Стивен Кинг?


4-85281
-=NIGERS_BASTARD=-
2002-06-21 17:09
2002.08.26
Как изменить координаты окна внешнего приложения


3-84891
Radimir
2002-08-06 10:35
2002.08.26
Как подставить имя таблицы через Select


1-84977
minva
2002-08-15 16:59
2002.08.26
Компоненты с исходным кодом