Не поиму в чем дело есть ветки PCnav (Treeview) на ней висит код:
Код:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | 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 , при этом два раза подряд срабатывает....
27.12.2010, 17:14
Access violation at address 00000000 Read of address 00000000
Древовидный вид