mainunit.h

16人格测试 16人格测试 16人格测试 16人格测试

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

#ifndef MainUnitH
#define MainUnitH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "RzPanel.hpp"
#include <ExtCtrls.hpp>
#include "RzLabel.hpp"
#include "bsSkinCtrls.hpp"
#include "ChnCalendar.hpp"
#include "RzCmboBx.hpp"
#include "RzEdit.hpp"
#include <Mask.hpp>
#include "RzBckgnd.hpp"
#include <jpeg.hpp>
#include "RzCommon.hpp"
#include <ADODB.hpp>
#include <DB.hpp>
#include <ComCtrls.hpp>
//---------------------------------------------------------------------------
class Tfrm_client : public TForm
{
__published:	// IDE-managed Components
	TRzPanel *RzPanel1;
	TRzPanel *RzPanel2;
	TRzLabel *lb1;
	TbsSkinButtonLabel *bsSkinButtonLabel1;
	TbsSkinButtonLabel *bsSkinButtonLabel2;
	TRzLabel *lb2;
	TRzLabel *lb3;
	TRzLabel *lb4;
	TRzLabel *lb5;
	TRzURLLabel *RzURLLabel1;
	TRzEdit *RzEdit1;
	TRzEdit *RzEdit3;
	TChnCalendar *ChnCalendar1;
	TRzLabel *lb6;
	TRzSeparator *RzSeparator1;
	TImage *img1;
	TRzFrameController *rzfrmcntrlr1;
	TRzComboBox *RzComboBox1;
	TRzNumericEdit *RzNumericEdit1;
	TRzLabel *lb7;
	TRzComboBox *RzComboBox2;
	TRzLabel *lb8;
	void __fastcall RzPanel2MouseDown(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
	void __fastcall bsSkinButtonLabel2Click(TObject *Sender);
	void __fastcall RzURLLabel1Click(TObject *Sender);
	void __fastcall bsSkinButtonLabel1Click(TObject *Sender);
	void __fastcall RzEdit1KeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
	void __fastcall RzNumericEdit1KeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
	void __fastcall RzEdit3KeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
	void __fastcall img1Click(TObject *Sender);
private:	// User declarations
public:		// User declarations
	__fastcall Tfrm_client(TComponent* Owner);
	AnsiString cq,cf,rd;  //答题表名，统计因素，回答人RD
	void Cleardata();
	void creat16pf();
	AnsiString qry_ModelType();
};
//---------------------------------------------------------------------------
extern PACKAGE Tfrm_client *frm_client;
//---------------------------------------------------------------------------
#endif