делфи не распознает почему то стандартные типы такие как ftInteger,ftString и другие. В чем тут проблема. Код прилагаеться.
Код:
procedure CreateFields();
begin
with DM.TMain do
begin
TableName := 'Main';
if not DM.TMain.Exists then begin
with FieldDefs do begin
Clear;
with AddFieldDef do begin
Name := 'Field1';
DataType := ftinteger;
Required := True;
end;
with AddFieldDef do begin
Name := 'Field2';
DataType := ftString;
Size := 30;
end;
end;
CreateTable;
end;
end;
end;