//---------------------------------------------------------------------------
#include <vcl.h>
#include "TextureArrange.h"
#include "MainImage.h"
#pragma hdrstop

#include "Weaving.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "TPSpin"
#pragma resource "*.dfm"
TSimulationForm *SimulationForm;
//---------------------------------------------------------------------------
__fastcall TSimulationForm::TSimulationForm(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TSimulationForm::InitForm()
{
  if (MainImageForm->Plan->Texture->Item) {

  }
//  StaticText1->Caption = "Machine is TRICOT";
  ParentHeight = Parent->Height+20;
}
//---------------------------------------------------------------------------