Помогите разобраться с библиотеками

#include <vcl.h>
#include <math.h>
#pragma hdrstop
 
#include "Main.h"
#include <stdio.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TF_Main *F_Main;
int numev=0;
int xy[2][50];
int kv = 0;
int line;
bool select=false;
char **matrix;
FILE *F;
int *nechv;
AnsiString cyc;
//---------------------------------------------------------------------------
void __fastcall TF_Main::DeskClick(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)  
{
        if (numev==0)   
        {
 
                Desk->Canvas->Pen->Color=clBlack;
                Desk->Canvas->Pen->Width=12;
                Desk->Canvas->MoveTo(X,Y);
                Desk->Canvas->LineTo(X,Y);
                xy[0][kv]=X;
                xy[1][kv]=Y;
                Desk->Canvas->TextOutA(X+12, Y+12, AnsiString(kv=kv+1));
 
        }
        if (numev==1)
        {
            for (int i=0; i<kv; i++)
            {
                if ((X>(xy[0][i]-6))&&(X<(xy[0][i]+6)))
                {
                    if ((Y>(xy[1][i]-6))&&(Y<(xy[1][i]+6)))
                    {
                        if (select==false)
                        {
                            Desk->Canvas->Pen->Color=clRed;
                            Desk->Canvas->Pen->Width=8;
                            Desk->Canvas->MoveTo(xy[0][i],xy[1][i]);
                            Desk->Canvas->LineTo(xy[0][i],xy[1][i]);
                            line=i;
                            select=true;
                        }
                        else
                        {
                            Desk->Canvas->MoveTo(xy[0][line],xy[1][line]);
                            Desk->Canvas->LineTo(xy[0][line],xy[1][line]);
                            Desk->Canvas->Pen->Width=4;
                            Desk->Canvas->LineTo(xy[0][i],xy[1][i]);
                            if (i!=line)
                            {                               
                                matrix[line][i]=1;
                                matrix[i][line]=1;
                            }
                            select=false;
                        }
                        break;
                    }
                }
            }
        }
}
void __fastcall TF_Main::BNextClick(TObject *Sender)    
{
if (numev==0)
{
    matrix=new char* [kv];
    for (int i=0; i<kv; i++)
    {
        matrix[i]=new char [kv];
        for (int j=0; j<kv; j++)
        {
            matrix[i][j]=0;
        }
    }
    BNext->Caption="Ребра отмечены";
}
if (numev==1)
{
    BNext->Caption=" ";
    BNext->Enabled=false;
    nechv=new int [kv];
    int knv=0;
    F=fopen("Эйлеров_цикл.txt","wt");
    cyc="Исходная матрица смежности:\n";
    for (int i=0; i<kv;i++)
    {
        nechv[i]=404;
        int reb=0;
        for (int j=0; j<kv; j++)
        {
            if (matrix[i][j]==1)
            {
                cyc+='1';
                reb++;
            }
            else cyc+='0';
        }
        cyc+='\n';
        if (fmod(reb,2)!=0)
        {
            nechv[knv]=i;
            knv++;
        }
    }
    fprintf(F,cyc.c_str());
    if (knv!=0) DrawGraf(knv);  
    cyc="1";
    Cycle(0);   
    Res->Text=cyc;
    fclose(F);
}
numev++;
}
//---------------------------------------------------------------------------
void __fastcall TF_Main::DrawGraf(int knv)
{
    fprintf(F,"Добавили ребра:\n");
    Desk->Canvas->Pen->Width=1;
    Desk->Canvas->Pen->Color=clRed;
    Desk->Canvas->Pen->Style=psDash;
    for (int i=0; i<knv; i++)
    {
        if (nechv[i]!=404)
        {
            for (int j=i+1; j<knv; j++)
            {
                if (nechv[j]==404) continue;
                if (matrix[nechv[i]][nechv[j]]==0)
                {
                    Print(nechv[i],nechv[j]);
                    matrix[nechv[i]][nechv[j]]=1;
                    matrix[nechv[j]][nechv[i]]=1;
                    Desk->Canvas->MoveTo(xy[0][nechv[i]],xy[1][nechv[i]]);
                    Desk->Canvas->LineTo(xy[0][nechv[j]],xy[1][nechv[j]]);
                    nechv[i]=404;
                    nechv[j]=404;
                    break;
                }
            }
            if (nechv[i]!=404)
            {
                for (int j=i+1; j<knv; j++)
                {
                    if (nechv[j]==404) continue;
                    for (int k=0; k<kv; k++)
                    {
                        if (k!=nechv[i] && k!=nechv[j] &&
                            matrix[k][nechv[i]]==0 &&
                            matrix[k][nechv[j]]==0)
                        {
                            Print(k,nechv[i]);
                            Print(k,nechv[j]);
                            matrix[k][nechv[i]]=1;
                            matrix[k][nechv[j]]=1;
                            matrix[nechv[i]][k]=1;
                            matrix[nechv[j]][k]=1;
                            Desk->Canvas->MoveTo(xy[0][nechv[i]],xy[1][nechv[i]]);
                            Desk->Canvas->LineTo(xy[0][k],xy[1][k]);
                            Desk->Canvas->MoveTo(xy[0][nechv[j]],xy[1][nechv[j]]);
                            Desk->Canvas->LineTo(xy[0][k],xy[1][k]);
                            nechv[i]=404;
                            nechv[j]=404;
                            break;
                        }
                    }
                }
            }
        }
    }
    cyc="\nПолученная матрица смежности:\n";
    for (int i=0; i<kv; i++)
    {
        for (int j=0; j<kv; j++)
        {
            if (matrix[i][j]!=0) cyc+="1";
            else cyc+="0";
        }
        cyc+="\n";
    }
    fprintf(F,cyc.c_str());
}
//---------------------------------------------------------------------------
void __fastcall TF_Main::Cycle(int ver)
{
    for (int i=kv-1; i>-1; i--)   
    {
        if (matrix[i][ver]==0) continue;
        cyc+=",";
        cyc+=i+1;  
        matrix[i][ver]=0; 
        matrix[ver][i]=0;
        Cycle(i);
        break;
    }
}