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

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

Структура 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]

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


Наверх

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