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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"


//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------




__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{


ListBox1->Items->LoadFromFile("baza danych gasnic/dane.txt");

}
//---------------------------------------------------------------------------

int a = 0;





void __fastcall TForm1::proszkowa1Click(TObject *Sender)
{
Form3 -> Visible = true;
a = 1;

}
//---------------------------------------------------------------------------

void __fastcall TForm1::pianowa1Click(TObject *Sender)
{
Form3 -> Visible = true;
a = 2;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::sniegowa1Click(TObject *Sender)
{
Form3 -> Visible = true;
a = 3;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::gazowa1Click(TObject *Sender)
{
Form3 -> Visible = true;
a = 4;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::usungasnice1Click(TObject *Sender)
{
Form2 -> Visible = true;
}
//---------------------------------------------------------------------------