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

TShiftState Shift, int X, int Y)

{

Form1->Repaint();

}

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

// Файл Unit2.cpp для главной формы Form2

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

#include <vcl.h>

#pragma hdrstop

#include "Unit2.h"

#include "Unit1.h"

#include "Unit3.h"

#include "Unit4.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm2 *Form2;

int i=0;

bool fg1,fg2;

int v1,v2,c2;

int SelPos;

AnsiString a;

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

__fastcall TForm2::TForm2(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TForm2::SpeedButton1Click(TObject *Sender)