//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop

#include "matka.h"
//---------------------------------------------------------------------------
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
	: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::matka_mmChange(TObject *Sender)
{
  matka_km->Caption = StrToInt(matka_mm->Text)*0.2;	
}
//---------------------------------------------------------------------