Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2002.08.26;
Скачать: [xml.tar.bz2];

Вниз

Проблемы с с озданием *.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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
14-85166
cyborg
2002-07-29 20:17
2002.08.26
Просто интересно


8-85128
mda
2002-04-07 04:13
2002.08.26
Как преобразовать из BMP в любой другой формат кроме GIF и JPEG


1-85063
Arhangel
2002-08-14 14:54
2002.08.26
Как использовать переменную?


1-84994
AlexBeliy
2002-08-16 01:37
2002.08.26
Form with TrayIcon


1-85123
kerkonst
2002-08-15 11:02
2002.08.26
Как дождатся конца работы проги, запущенной через ShellExecutе





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский