Вниз
Скачать: CL | DM;

Структура dbf файла   Найти похожие ветки 

 
Arrows   (2005-01-25 09:24) [0]

Здравствуйте. Не подскажите как в Delphi определить размерность чилового поля - FLoat уже существующей базы данных DbaseIV?


 
Reindeer Moss Eater ©   (2005-01-25 09:40) [1]

Её не надо определять. Она фиксирована.


 
Arrows   (2005-01-25 09:48) [2]

Фиксированная, но нужно узнать в проге какой размер имеет данное числовое поле, его формат.


 
Johnmen ©   (2005-01-25 09:52) [3]

TField.DataType
А зачем это надо ?


 
Arrows   (2005-01-25 10:07) [4]

Johnmen
TField.DataType-
А зачем это надо ?

Размерность поля - Пример Num : 15.2
Надо для преобразования любой базы DBaseIV в другой формат. Размерность.


 
Reindeer Moss Eater ©   (2005-01-25 10:38) [5]

У флоат полей нет никакой размерности. Это плавающая точка.
А размер в байтах фиксирован.
Поэтому Size и Precision вернут нули.


 
Arrows   (2005-01-25 11:01) [6]

Reindeer Moss Eater
У флоат полей нет никакой размерности. Это плавающая точка

Тогда как прочитать точную структуру dbf-файла?


 
Reindeer Moss Eater ©   (2005-01-25 11:05) [7]

Класс TFieldDefs.
Метод Update.
Свойство TFieldDef


 
Arrows   (2005-01-25 11:27) [8]

Непонял!?
Как получить точную структуру dbf в тексте программы?


 
Reindeer Moss Eater ©   (2005-01-25 11:34) [9]

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:47) [10]

Пишу:
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:49) [11]

Я ж тебе русским языком сказал, что для ftFloat определять размерность бесполезно.


 
Reindeer Moss Eater ©   (2005-01-25 11:50) [12]

и ftInteger - то же.


 
HSolo ©   (2005-01-25 12:06) [13]

Если работаете ч/з BDE, то DbiGetFieldDescs


 
Arrows   (2005-01-25 13:01) [14]

Спасибо всем за дискуссию. Разобрался.
Если кому интересно: Все данные есть в шапке dbf отуда и надо брать данные.


 
Arrows   (2005-01-25 13:02) [15]

Спасибо всем за дискуссию. Разобрался.
Если кому интересно: Все данные есть в шапке dbf отуда и надо брать данные.



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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.029 c
1-1107217901
TButton
2005-02-01 03:31
2005.02.20
CGI на Delphi


3-1106060831
Prohodil Mimo
2005-01-18 18:07
2005.02.20
Почему могут глючить триггера в IB6x?


1-1107409966
fynjy1984
2005-02-03 08:52
2005.02.20
DBGridEh и копирование


3-1106244885
soxati
2005-01-20 21:14
2005.02.20
компоненты ADO


1-1107449489
Muhan
2005-02-03 19:51
2005.02.20
Как проверить существует ли файл?




   Наверх