Подскажите пожалуйста в чем моя ошибка:
Код:
procedure TForm1.TreeView1DblClick(Sender: TObject);
begin
if form1.TreeView1.Selected.SelectedIndex=1
then
form3.Show;
end;
begin
if form1.TreeView1.Selected.SelectedIndex=2
then
form2.Show;
end.
выдает: access violation at address 004DBC9A in module