[BulatStil]

У меня возникла проблема только начал разбираться с базами данных и тут же встал вопрос как создать дополнительный столбец уже в имеющейся базе, подскажите пожалуйста может что делаю не так, код имеет следующий вид:

procedure TForm1.Button3Click(Sender: TObject);
var
Field: TFloatField;
f:tfield;
begin
Table.Close;
Field:=TFloatField.Create(Table);
f:=Table.Fields.FieldByName('POINT_Y');
Field.Assign(f);
Table.Fields.Add(Field);
Table.Open;
end;

пытаюсь скопировь все параметры с поля которое уже имееться в .dbf и оно имеет физическое имя 'POINT_Y'. Постоянно выдает ошибку что не может найти поле 'POINT_Y'.

[TOJluK]

Набор данных закрыт, поэтому и ругается.

[BulatStil]

после закрытия базы по новой открыл ее все равно ругаеться:

почему я же как раз в Field и добавляю значение.
вот новый код:

procedure TForm1.Button3Click(Sender: TObject);
var s:string;
Field: TFloatField;
f:tfield;
begin
Table.Close;
Table.Open;
Field:=TFloatField.Create(Table);
f:=Table.Fields.FieldByName('POINT_Y');
Field.Assign(f);
Table.Fields.Add(Field);
end;

[lmikle]

Попробуй добавлять в FieldDefs.

[BulatStil]

попробовал написать следующим образом

Table.FieldDefs.Add(Field.FieldName, TFloatField, 0, false);

выдает ошибку [Error] Unit1.pas(113): Incompatible types: 'TFieldType' and 'Class reference' как я понял что эта ошибка связана с тем что я не правильно выбрал тип TfloatField хотя в подсказке написано DataType: TFieldType. может я не правильно понял((

[BulatStil]

нашел ошибку надо было писать ftFloat

ошибку исправил а ошибка старая появилась((( Field " not data set