| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как добавить новое поле в таблицу Oracle с помощью dbExpress?

Сергей ©   (2012-03-20 19:49:00) 

Всем привет. Пробую добавить новое поле. В таком варианте выдает ошибку.

//добавить новый аккаунт в таблицу сообщений
function TfrmMain.AddAccount(FileBaseName, NameTableMes, Account:String): boolean;
var
SqlString:String;
begin
 try
   result:=false;
   Screen.Cursor := crSQLWait;
   SqlString:='ALTER TABLE ' +NameTableMes+ ' ADD ' +Account+ ' VARCHAR(64) NOT NULL';
   // загружаю поле сообщений
   sdsBase.Active := false;
   sdsBase.DataSet.Active := false;
   sdsBase.DataSet.CommandText := SqlString;
    sdsBase.DataSet.Active := true; // ошибка здесь
   sdsBase.Active := true;
   Screen.Cursor :=crArrow;
   result:=true;
 finally
  begin
  sdsBase.Active := false;
  sdsBase.DataSet.Active := false;
  Screen.Cursor :=crArrow;
  end;
 end;
end;


---

Сергей   (2012-03-21 19:20:00) [1]

Ошибка - InternalDataSet: Cursor not returned from Query

---

Palladin   (2012-03-20 20:33:00) [2]

какую ошибку? луна не в пятом доме? юзеры млин...

---

Германн   (2012-03-20 20:21:00) [3]

ExecSQL наверно вместо Active

---

Наверх