![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Структура dbf файла [D5, D6, D7, dBase, FoxPro]
Arrows © (2005-01-25 09:24:00)Здравствуйте. Не подскажите как в Delphi определить размерность чилового поля - FLoat уже существующей базы данных DbaseIV?
Arrows (2005-01-25 13:02:00) [1]Спасибо всем за дискуссию. Разобрался.
Если кому интересно: Все данные есть в шапке dbf отуда и надо брать данные.
Arrows (2005-01-25 13:01:00) [2]Спасибо всем за дискуссию. Разобрался.
Если кому интересно: Все данные есть в шапке dbf отуда и надо брать данные.
HSolo (2005-01-25 12:06:00) [3]Если работаете ч/з BDE, то DbiGetFieldDescs
Reindeer Moss Eater (2005-01-25 11:50:00) [4]и ftInteger - то же.
Reindeer Moss Eater (2005-01-25 11:49:00) [5]Я ж тебе русским языком сказал, что для ftFloat определять размерность бесполезно.
Arrows (2005-01-25 11:47:00) [6]Пишу:
k - размерность поля
For i:=0 to dbf1.FieldCount-1 do
begin
If (Form1.dbf1.Fields[i].DataType = ftString)then
k:=Dbf1.Fields[i].Size;
If (Form1.dbf1.Fields[i].DataType = ftFloat)or (Form1.dbf1.Fields [i].DataType = ftInteger)then
k:= ...?????
end;
Reindeer Moss Eater (2005-01-25 11:34:00) [7]with TQuery.Create(nil) do
try
DatabaseName := ....
SQL.Text:= select * from tablename';
FieldDefs.Update;
for i:=0 to Pred(FieldDefs.Count) do
begin
MyFieldDef := FieldDefs.Items[i];
if MyFieldDef.DataType = ftString then ShowMessage(...)
else ...
...
...
end;
finally
Free;
end;
Arrows (2005-01-25 11:27:00) [8]Непонял!?
Как получить точную структуру dbf в тексте программы?
Reindeer Moss Eater (2005-01-25 11:05:00) [9]Класс TFieldDefs.
Метод Update.
Свойство TFieldDef
Arrows (2005-01-25 11:01:00) [10]Reindeer Moss Eater
У флоат полей нет никакой размерности. Это плавающая точка
Тогда как прочитать точную структуру dbf-файла?
Reindeer Moss Eater (2005-01-25 10:38:00) [11]У флоат полей нет никакой размерности. Это плавающая точка.
А размер в байтах фиксирован.
Поэтому Size и Precision вернут нули.
Arrows (2005-01-25 10:07:00) [12]Johnmen
TField.DataType-
А зачем это надо ?
Размерность поля - Пример Num : 15.2
Надо для преобразования любой базы DBaseIV в другой формат. Размерность.
Johnmen (2005-01-25 09:52:00) [13]TField.DataType
А зачем это надо ?
Arrows (2005-01-25 09:48:00) [14]Фиксированная, но нужно узнать в проге какой размер имеет данное числовое поле, его формат.
Reindeer Moss Eater (2005-01-25 09:40:00) [15]Её не надо определять. Она фиксирована.