ctrls.cpp

强大的皮肤控件 能做出美观的界面

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

#include <vcl.h>
#pragma hdrstop

#include "ctrls.h"
#include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "KsSkinButtons"
#pragma link "KsSkinCheckBoxs"
#pragma link "KsSkinForms"
#pragma link "KsSkinGroupBoxs"
#pragma link "KsSkinProgress"
#pragma link "KsSkinScrollBars"
#pragma link "KsSkinTrackBars"
#pragma resource "*.dfm"
TfrmControls *frmControls;
//---------------------------------------------------------------------------
__fastcall TfrmControls::TfrmControls(TComponent* Owner)
        : TForm(Owner)
{
  SeSkinCheckBox1->Checked = frmMain->SeSkinCheckBox1->Checked;
}
//---------------------------------------------------------------------------
void __fastcall TfrmControls::NgTrackBar1Change(TObject *Sender)
{
  NgProgressBar1->Position = NgTrackBar1->Position;
  NgProgressBar2->Position = NgTrackBar1->Position;

}
//---------------------------------------------------------------------------
void __fastcall TfrmControls::NgButton2Click(TObject *Sender)
{
  Close();        
}
//---------------------------------------------------------------------------
void __fastcall TfrmControls::SeSkinCheckBox1Click(TObject *Sender)
{
  frmMain->SeSkinCheckBox1->Checked = SeSkinCheckBox1->Checked;
}
//---------------------------------------------------------------------------