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

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

Query1:=Tquery.create(nil); [D5, dBase, FoxPro]


denis24 ©   (2005-06-08 16:09:00) 

создаю динамически датасет,потом уничтожаю Query1.free
а как перед уничтожением проверить есть он или уже уничтожен?


denis24   (2005-06-08 17:08:00) [1]

Спасибо
дало было в датасорсе


sniknik   (2005-06-08 16:33:00) [2]

так ошибку тогда выдает не он а тот датасорс который внезапно стал "смотреть" в ахинею...


Ega23   (2005-06-08 16:33:00) [3]

DataSource1.DataSet:=nil;
if Query1.Active then Query1.Close;
Query1.Free;


denis24   (2005-06-08 16:29:00) [4]

Да, он через датасорс привязан к гриду и отображает данные


Virgo_Style   (2005-06-08 16:28:00) [5]

Так, что-то я тормознул =)
if Assigned не нужен.

Попробуй все же не ...Free, а FreeAndNil(...)


Ega23   (2005-06-08 16:27:00) [6]

На него, поди, DataSource какой-нибудь смотрит?


sniknik   (2005-06-08 16:25:00) [7]

denis24   (08.06.05 16:20) [3]

var
query_t: Tquery;
.
.
query_t:= TQuery.create(nil);
try
.
.
finally
 query_t.free;
end;


Max Zyuzin   (2005-06-08 16:24:00) [8]

>denis24   (08.06.05 16:20) [3]
МОжно пример услышать когда это нужно?


denis24   (2005-06-08 16:20:00) [9]

А если нужно..
Пишу
var
query_t:Tquery;
.
.
query_t:=TQuery.create(nil);
.
.
if Assigned (query_t) then query_t.free;

И на последней сроке Access violation....


Virgo_Style   (2005-06-08 16:19:00) [10]

if Assigned(...) then FreeAndNil(...);

при инициализации ...:=nil;


Anatoly Podgoretsky   (2005-06-08 16:15:00) [11]

Не допускать подобной возможности.


Наверх

Титульная страница Поиск, карта сайта Написать письмо