Показано с 1 по 2 из 2
Древовидный режим
-
13.05.2011, 10:39 #1
- Регистрация
- 04.03.2010
- Сообщений
- 8
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
Ошибка при втором проходе
Приложение на Delphi 6.
Таблица NewDbf типа TwwTable динамически создается и заполняется. Без проблем.
Однако при втором проходе на wwQuery1.ExecSQL вылетает ошибка "Table is busy". Почему?
Код:SavedMrsh := SaveDialog2.FileName; If NewDbf <> nil then begin if NewDbf.Active then begin NewDbf.Close; end; end; wwQuery1.Close; wwQuery1.SQL.Clear; wwQuery1.SQL.Text := 'Drop TABLE "' + SavedMrsh + '"'; wwQuery1.ExecSQL; // Здесь ошибка при втором прогоне NewDbf := TwwTable.Create(Self); wwQuery1.SQL.Clear; wwQuery1.SQL.Text := ' Create Table "' + SavedMrsh + '"' + ' (NOM Numeric(6),' + ' SPISOK CHAR(61),' + ' RAION CHAR(37),' + ' LON NUMERIC(10),' + ' LONHEX CHAR(8),' + ' LAT NUMERIC(10),' + ' LATHEX CHAR(8),' + ' NOMER CHAR(6),' + ' KORPUS CHAR(6))'; wwQuery1.ExecSQL;
Похожие темы
-
Ошибка при установке винды...
от Mirvays в разделе Windows XPОтветов: 3Последнее сообщение: 07.09.2009, 15:59
Социальные закладки