Тема: ADO-> SQL
Показать сообщение отдельно
  #1  
Старый 11.09.2011, 17:56
Heneken Heneken вне форума
Новичок
 
Регистрация: 11.09.2011
Сообщения: 73
Версия Delphi: Delphi XE6
Репутация: 10
По умолчанию ADO-> SQL

Блин уже перерыл весь интернет, ..помощи прошу редко но уже устал
проблема в следующем:
Вот код
Код:
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)
Ответить с цитированием