edits.cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "Edits.h"
#include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "se_controls"
#pragma link "KsSkinCheckBoxs"
#pragma link "KsSkinEdits"
#pragma resource "*.dfm"
TfrmEdits *frmEdits;
//---------------------------------------------------------------------------
__fastcall TfrmEdits::TfrmEdits(TComponent* Owner)
        : TForm(Owner)
{
  SeSkinCheckBox2->Checked = frmMain->SeSkinCheckBox1->Checked;
}
//---------------------------------------------------------------------------
void __fastcall TfrmEdits::SeSkinCheckBox2Click(TObject *Sender)
{
  frmMain->SeSkinCheckBox1->Checked = SeSkinCheckBox2->Checked;
}
//---------------------------------------------------------------------------
void __fastcall TfrmEdits::NgRadioGroup1Click(TObject *Sender)
{
  SeSkinCheckBox1Click(Sender);
}
//---------------------------------------------------------------------------
void __fastcall TfrmEdits::SeSkinRadioGroup1Click(TObject *Sender)
{
  SeSkinEdit1->TextAlignment = TAlignment(SeSkinRadioGroup1->ItemIndex);
}
//---------------------------------------------------------------------------

void __fastcall TfrmEdits::SeSkinCheckBox1Click(TObject *Sender)
{
  if (SeSkinCheckBox1->Checked) {
    SeSkinEdit1->PasswordKind = TPasswordKind(NgRadioGroup1->ItemIndex + 1);
//    SeSkinEdit1->PasswordWideChar = SeSkinEdit2->Text[1];
  }
  else {
    SeSkinEdit1->PasswordKind = pkNone;
  }
        
}
//---------------------------------------------------------------------------

void __fastcall TfrmEdits::SeSkinEdit2Change(TObject *Sender)
{
  SeSkinCheckBox1Click(Sender);        
}
//---------------------------------------------------------------------------