Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

Вылетает ошибка 


Rustik   (2002-03-19 15:41) [0]

Мастера помогите! У меня вылетает ошибка “error creating cursor handle”
При создании формы у меня происходит заполнение ComboBoxa и обновление таблицы через SQL запрос (в таблицу вставляются свежие данные)
procedure TKrat_danForm.FormCreate(Sender: TObject);
begin
Table2.Open;
Query2.Close;
Query2.Open;
Table2.First;
Table1.Active:=true;
ComboBox1.Clear;
Ошибка вылетает в этом месте
while not Table1.eof do
begin
ComboBox1.Items.Add(Table1.FieldbyName("Name_uchastka").AsString);
Table1.Next;
end;
Table2.IndexName := "FIO_Ind";
end;



Cobalt   (2002-03-19 15:49) [1]

Попробуй перенести это в OnActivate, т.к. при создании окна ещё не созданы (кажется)...



sniknik   (2002-03-19 15:49) [2]

повесь все это хозяйство на FormShow, при создании возможно не все компоненты созданы а уже есть обращение.

procedure TKrat_danForm.FormShow(Sender: TObject);
const once: boolean = True;
begin
if once then begin
....
once:= False;
end;
end;



Lusha   (2002-03-19 15:50) [3]

В приведенном коде я "криминала" не вижу. А что "висит" на событиях ComboBox1? Например, на OnChange.



JibSkeart   (2002-03-19 15:50) [4]

Скорее всего енто от того что
Query.Open

попробуйте вот так !
Query.ExecSql



Chestniy   (2002-03-19 15:56) [5]

У меня такое сообщение регулярно бывало в случае если я запросу, который не возвращает данные, говорю вместо ExecSQL Open или Active:=True.



Johnmen   (2002-03-19 16:01) [6]

ComboBox1.Items.Clear



clarin   (2002-03-19 16:53) [7]

вылетает то на Query2.Open
действительно нужно Query2.ExecSQL




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.023 c
6-32913           Z                     2002-01-04 23:40  2002.04.11  
Как получить IP адрес компьютера?


7-32985           kievsash              2002-01-14 03:05  2002.04.11  
Как подставить свою прогу на Ctrl+Alt+Del


1-32890           DikobraZ              2002-03-29 15:52  2002.04.11  
JPG в буфер!


14-32964          angela                2002-03-04 16:59  2002.04.11  
ini- файлы


1-32729           cok                   2002-03-27 18:14  2002.04.11  
Автозапуск(быстрый)