Курсовая работа: Основы разработки электронного учебника

{

int z=Form2->TreeView1->Items->Owner->Selected->SelectedIndex;

if (z<Form2->TreeView1->Items->Count-1){

Form2->TreeView1->Items->Item[z+1]->Selected=true;

Form2->TreeView1->OnDblClick(Sender); }

}

//---------------------------------------------------------------------------

void __fastcall TForm2::SpeedButton2Click(TObject *Sender)

{

int z=Form2->TreeView1->Items->Owner->Selected->SelectedIndex;

if (z>0){

Form2->TreeView1->Items->Item[z-1]->Selected=true;

Form2->TreeView1->OnDblClick(Sender);}

}

//---------------------------------------------------------------------------

void __fastcall TForm2::TreeView1KeyDown(TObject *Sender, WORD &Key,

TShiftState Shift)

{

if (Key==VK_RETURN){Form2->SpeedButton3->OnClick(Sender);}

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Memo1KeyDown(TObject *Sender, WORD &Key,

TShiftState Shift)

{

if (Key==VK_RETURN){Form2->SpeedButton3->OnClick(Sender);}

}

//---------------------------------------------------------------------------

void __fastcall TForm2::N4Click(TObject *Sender)

{