[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, попробую помочь

[Asinkrit]

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

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

Прекращай уводить народ, вопросы заданные на форуме, решаться должны так же на форуме. Тебе уже делали по этому поводу замечание. Помоги ей лучше в правильном разделе создать тему, и поможем ей разобраться с ее проблемой.

[Assistant]

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

Прекращай уводить народ, вопросы заданные на форуме, решаться должны так же на форуме. Тебе уже делали по этому поводу замечание. Помоги ей лучше в правильном разделе создать тему, и поможем ей разобраться с ее проблемой.

там вообще отношения к программированию не было, поэтому я и предложил решить в аське и TeamViewer, были трояны, 3 штуки, DLLки и EXE'ник один, убрал, почистил все - заработало как надо. AVZ + Gmer рулят.

P.S.: я ещё не одного человека не увел с форума и не собираюсь, если что-то в аське решалось, то выкладывалось сразу здесь по программированию.
P.S.2: а не отписался по окончанию решения проблемы потому что был занят. Вот щас все бросил, ради того что бы ответить.

[Asinkrit]

Понимаешь, ситуация в том, что большинству людям, которые посещают форум, важна не конечный результат решения проблемы, а алгоритм ее решения. Который ты провернул в аське, и если человек попадет в данную тему через поиск, то что он увидит, описание его проблемы, стучите в аську, и результат, мол все решено, было то и то, а как оно было решено, что при этом делали, для него останется загадкой.

[Assistant]

там такое решение, что если не умеешь пользоваться AVZ, то нужно ТАКОЙ мануал тут накатать, что ну его нафиг такое решение вообще. А этот человек понятия не имел не о AVZ, не о троянах.

P.S. и я написал что AVZ и GMER рулят, просто сразу не было времени ответить.

[PhoeniX]

Прекращайте оффтопить оба. Я так понимаю, изначальная проблема ещё не решена.
%Dead_Gigabit, у тебя на какой строчке именно вылетает? Очень похоже, что какой-то компонент в момент запроса не создан. Пройдись трейсом по коду, посмотри, где у тебя ошибка. Что вообще за PCnav?