[Heneken]

Блин уже перерыл весь интернет, ..помощи прошу редко но уже устал
проблема в следующем:
Вот код

Код:

for i:=0 to standart2.Lines.Count-1 do
begin
if standart3.Lines[i]='C' then
begin
types:='VARCHAR'+'('+standart.Lines[i]+')';
end;
if standart3.Lines[i]='D' then
begin
types:='DATE';
end;
if standart3.Lines[i]='N' then
begin
types:='FLOAT';
end;

if standart3.Lines[i]='NM' then
begin
types:='FLOAT';
end;
sqls:=sqls+standart2.Lines[i]+' '+ types +',';
end;
sqls:=copy(sqls,1,length(sqls)-1);
MyQuer.SQL.text:='Create Table DEFREESTR ('+ sqls+')';
MyQuer.ExecSQL;

Админ: Пользуемся тегами для оформления кода!

Скажите как мне явно задать поле FLOAT! к примеру (13,2)
Скажите как мне явно задать поле INT! К примеру не больше 5, если в понимани текста то типа VARCHAR(5) Заранее спасибо( У меня вылетает ошибака драйвера при устновке к примеру FLOAT(15,2)
Provider=MSDASQL.1;Password="admin";Persist Security Info=True;Data Source=Файлы dBASE;Initial Catalog=E:\RM_Client\files\data
БАза DBase естесно..... прошу помощи как мне это оргнизовать (подключено через ADO)