Скачиваний:
7
Добавлен:
02.05.2014
Размер:
1.38 Кб
Скачать
#include <vcl.h>
#include <stdio.h>
#pragma hdrstop
#include "Main.h"
#include "GV.h"
#include "Gurwitz.h"
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmMain *frmMain;
GV gv;
__fastcall TfrmMain::TfrmMain(TComponent* Owner)
    : TForm(Owner)
{
    LoadFile("input.txt");
    StringGrid1->Rows[0]->Add("e1");
    StringGrid1->Rows[0]->Add("e2");
    StringGrid1->Rows[0]->Add("min");
    StringGrid1->Rows[0]->Add("max");
    StringGrid1->Rows[0]->Add("Sum");

}
int TfrmMain::LoadFile(String filename)
{
    FILE *input;
    int temp=0;
    int i=0,j=0;
    input = fopen(filename.c_str(),"r");
    while(!feof(input))
    {
        fscanf(input,"%d",&temp);
        gv.matrix[i][j] = temp;
        if(j==0) j=1;
        else { j=0; i++;}
    }
    gv.row = i;

}
void __fastcall TfrmMain::Button1Click(TObject *Sender)
{
    float p1 = StrToFloat(Edit1->Text);
    Gurwitz *grwtz;
    grwtz = new Gurwitz(gv.matrix, gv.row,p1);
    grwtz->DrawPoint(Series1,gv.matrix,gv.row);
    grwtz->DrawRectangle(Series2,Series3,gv.matrix,gv.row);
    grwtz->DrawModify(Series4,Series5,Series6,gv.matrix,gv.row);
    grwtz->AddToString(StringGrid1,gv.matrix,gv.row);
    Label4->Caption = grwtz->index + 1;
    Label5->Caption = gv.matrix[grwtz->index][0];
    Label6->Caption = gv.matrix[grwtz->index][1];
    delete[] grwtz;
}
Соседние файлы в папке Лабораторная работа №6 - Программа3