//--------------------------------------------------------------------------- #include #pragma hdrstop #include "GlobalUnit.h" #include "StyleSpecsFormUnit.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "GeneralDialogPanel" #pragma link "TextButton" #pragma resource "*.dfm" TStyleSpecsForm *StyleSpecsForm; //--------------------------------------------------------------------------- __fastcall TStyleSpecsForm::TStyleSpecsForm(TComponent* Owner, DWORD dwError) : TForm(Owner) { m_dwError = dwError; Font->Color = RGB(60,43,23); } //--------------------------------------------------------------------------- __fastcall TStyleSpecsForm::~TStyleSpecsForm() { } //--------------------------------------------------------------------------- void __fastcall TStyleSpecsForm::WMNCHitTest(TWMNCHitTest &Msg) { TForm::Dispatch(&Msg); if( Msg.Result==HTCLIENT && Msg.YPosFont->Size = g_szFont9; m_btnOk->FontSize = g_szFont9; m_lblSpecs1->Caption = "1、伴奏个数不得少于4个"; m_lblSpecs2->Caption = "2、加花个数不得少于2个"; m_lblSpecs3->Caption = "3、大调前奏个数不得少于2个"; m_lblSpecs4->Caption = "4、小调前奏个数不得少于2个"; m_lblSpecs5->Caption = "5、大调尾奏个数不得少于2个"; m_lblSpecs6->Caption = "6、小调尾奏个数不得少于2个"; m_lblSpecs7->Caption = "7、待分享风格必须完全由发布风格组合而成"; m_lblSpecs8->Caption = "8、待发布风格必须完全由本地风格组合而成"; m_aLabel[0] = m_lblSpecs1; m_aLabel[1] = m_lblSpecs2; m_aLabel[2] = m_lblSpecs3; m_aLabel[3] = m_lblSpecs4; m_aLabel[4] = m_lblSpecs5; m_aLabel[5] = m_lblSpecs6; m_aLabel[6] = m_lblSpecs7; m_aLabel[7] = m_lblSpecs8; for( int i=0; iFont->Color = ( m_dwError & (1<