[Dead_Gigabit]

Не поиму в чем дело есть ветки PCnav (Treeview) на ней висит код:

Код:

var
  y: TUCH;
  i: integer;
  n:string;
begin
n:=PCnav.Selected.Text;
DM.IBQuery1.Close;
DM.IBQuery1.SQL.Clear;
DM.IBQuery1.SQL.Add('SELECT *');
DM.IBQuery1.SQL.Add('FROM "UCH"');
DM.IBQuery1.SQL.Add('WHERE USE like ''' +'%'+n+'%''');
DM.IBQuery1.Open;
for i:= 0 to MdiChildCount - 1 do
 MDIChildren[i].Close;
    y := TUCH.Create(Owner);
    y.WindowState:=wsMaximized;

После 3 раза нажатия на ветку вылитает сообщение: Access violation at address 00000000 Read of address 00000000 , при этом два раза подряд срабатывает....

[M.A.D.M.A.N.]

Объект не создан.
Какого овнера передаешь?
Советую поставить точку останова и пошагово посмотреть на какой строчке падает. Так будет проще багу искать
И еще, желательно в начале прописать

Код:

if PCnav.Selected = nil then
  Exit;

[Dead_Gigabit]

Вылетает на запросе:

Код:

DM.IBQuery1.Close;
DM.IBQuery1.SQL.Clear;
DM.IBQuery1.SQL.Add('SELECT *');
DM.IBQuery1.SQL.Add('FROM "UCH"');
DM.IBQuery1.SQL.Add('WHERE USE like ''' +'%'+n+'%''');
DM.IBQuery1.Open;

Но тут нечего необычного нет

P.S

Забыл сказать PCnav формируется из БД

Код:

var
  S: TUCH;
  K,c,r:integer;
begin
DM.IBQuery1.Active:=false;
  DM.IBQuery1.SQL.Clear;
  DM.IBQuery1.SQL.Add('SELECT *');
  DM.IBQuery1.SQL.Add('FROM "SOTR" order by FIO asc');
DM.IBQuery1.Active:=true;
PCnav.Items.Clear;
c:=0;
k:=1;
dm.IBQuery1.first;
while not (dm.IBQuery1.eof) do
begin
c:=i+1;
K:=k+1;
PCnav.Items.AddObject(nil, dm.IBQuery1.fieldbyname('FIO').asstring,
    Pointer(dm.IBQuery1.fieldbyname('FIO').asstring));
dm.IBQuery1.next;
PCnav.ReadOnly:=true;
  end;
    end;

[vika]

при выключение компа вылетает access violation at addres 00000000 read of address 00000000.
обьясните все пошагому что и как это убрать((( я мало понимаю что за код и куда его втыкать
заранее спасибо

[Asinkrit]

Сообщение от vika

при выключение компа вылетает access violation at addres 00000000 read of address 00000000.
обьясните все пошагому что и как это убрать((( я мало понимаю что за код и куда его втыкать
заранее спасибо

Код который описан выше к вашей ошибке не имеет ни какого отношения, это раз. Для своего вопроса, надо создать новую тему в разделе новичков или другое, это два. Ваша ошибка, вероятнее всего появляется при закрытии какого-то приложения установленного в вашей системе это три.
Для начала, надо попробовать определить, что за приложение выдает ошибку, а дальше разбираться с ним. Для начала советую посмотреть в журнал событий виндовс, на "Мой компьютер" жмем правой кнопкой и в меню выбираем "Управление", там в разделе Просмотр событий, в категориях "Приложения" и "Система" ищем ошибки с восклицательным знаком, при обнаружении которых, их там открываем и смотрим что за программа их инициировала. Дальше удаляем или пере-устанавливаем на последнюю версии программы.

[Asinkrit]

Сообщение от Dead_Gigabit

Вылетает на запросе:

Код:

DM.IBQuery1.Close;
DM.IBQuery1.SQL.Clear;
DM.IBQuery1.SQL.Add('SELECT *');
DM.IBQuery1.SQL.Add('FROM "UCH"');
DM.IBQuery1.SQL.Add('WHERE USE like ''' +'%'+n+'%''');
DM.IBQuery1.Open;

Конкретно на какой строчке вылетает? Вылетать может при Close; и при Open;
Если раньше работало, то смотрите изменения которые вы внесли в код.
Вместо этого:

Код:

for i:= 0 to MdiChildCount - 1 do

лучше написать вот это:

Код:

While MdiChildCount > 0 do

[vika]

у меня куча ошибок в управление компа и в приложении и в системе.все с воскличательным знаком только почему то удалить их нельзя

[Assistant]

vika, стукайте в аську 593977748, попробую помочь