Проблема создания поля Numeric

← →
Evyshka (2004-06-03 12:30) [0]

Работаю с foxpro таблцами
Проблема вот в чем при использовании BatchMove создаю конечную таблицу
procedure MoveTable(Atablename:string; CTablename:string; copytable:ttable; pyt:string);
begin
with batchmove1 do
begin
with table2 do
begin
Active := False;
DatabaseName := pyt;
TableName := atablename;
CreateTable;
end;
Table1.tablename:= ctablename;
execute;

end;
После выполнения все поля которые в исходной таблицу были формата Numeric(15;0) становятся Numeric(15;4)
Если при создании указываю
table2.FieldDefs.items[51].DataType:=ftinteger;
то создает Numeric(11;0) обрезая значения Что делать???

← →
Reindeer Moss Eater © (2004-06-03 12:36) [1]

Какой тип у поля когда создается Numeric(15;4) ?

table2.FieldDefs.items[51].DataType:=???

← →
Evyshka (2004-06-03 12:40) [2]

Создается поле NUmeric(15;0)хотя исходное Numeric(15;0)

← →
Reindeer Moss Eater © (2004-06-03 13:02) [3]

Какой тип у экземпляра TField когда создается Numeric(15;4) ?

table2.FieldDefs.items[51].DataType:=???

← →
Evyshka (2004-06-03 14:53) [4]

ftfloat

← →
Evyshka (2004-06-03 15:06) [5]

table2.FieldDefs.items[26].DataType:=ftfloat;
table2.FieldDefs.items[26].presicion:=0;
Все равно Numeric(15;4)

Проблема создания поля Numeric Найти похожие ветки