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

#include "Schematic.h"
#include "ChipFunctions.h"      // переменные для работы с памятью чипа
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TSchema *Schema;
//---------------------------------------------------------------------------
__fastcall TSchema::TSchema(TComponent* Owner)
        : TForm(Owner)
{ // если какой-нибудь чип выбран
  if(SelectedChip.Family|SelectedChip.Modify)
  {     // отображаем схему подключения
        if(FileExists(SelectedChip.ImageName))        // загружаем схему подключения
        { Schema->Image1->Picture->LoadFromFile(SelectedChip.ImageName);
        }
        else
        { MessageBox(NULL,"Невозможно отобразить схему подключения,\n(не найден файл картинки). Или подключайте\nпо даташиту, или скачайте полную версию\nпрограммы с сайта radiohlam.ru","Error",MB_OK);
          Schema->Image1->Picture->Bitmap->FreeImage();
        }
  }
}
//---------------------------------------------------------------------------
void __fastcall TSchema::FormResize(TObject *Sender)
{ Image1->Width = Schema->ClientWidth;
  Image1->Height = Schema->ClientHeight;
}
//---------------------------------------------------------------------------
