//--------------------------------------------------------------------------- void __fastcall TApFilePageForm::btnExitClick(TObject *Sender) { int nState=m_enState; if(m_enState==EN_STATE_IDLE) Close(); else { m_enState=EN_STATE_IDLE; ResetCtrl(); if(nState!=EN_STATE_NEW) btnQueryClick(Sender); } }
void __fastcall TfrmSearch::Action2Execute(TObject *Sender) { if(btnQuery->Caption == "停止") return; btnQueryClick(NULL); }