unit1.~cpp

单片机定时器初始值计算软件

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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::btn1Click(TObject *Sender)
{

int date;
int a,b;
float crystl;

switch (rg2->ItemIndex)
{
  case 0:
        crystl = 2;
        break;
  case 1:
        crystl = 12 / 11.0592;
        break;
  case 2:
        crystl = 1;
        break;
  case 3:
        crystl = 0.5;
        break;

}

date = StrToInt(input->Text) / crystl;

        switch (rg1->ItemIndex)
        {
          case 0:
                if(8192 - date < 0)
                {
                        Application->MessageBox("输入的数值应小于8192us!!!!",
                            "提示", MB_OK);
                        return;

                }
                a = ((8192 - date) >> 5) & 0x0ff;
                b = (8192 - date) & 0x001f;
                output1->Text = "0x"+ IntToHex(a,2);
                output2->Text = "0x"+ IntToHex(b,2);
                break;

          case 1:
                if(65536 - date < 0)
                {
                  Application->MessageBox("输入的数值应小于65536us!!!!", 
                      "提示", MB_OK);
                      return;


                }
                a = (65536 - date) >> 8;
                b = (65536 - date) & 0x00ff;
                output1->Text = "0x"+ IntToHex(a,2);
                output2->Text = "0x"+ IntToHex(b,2);
                break;
          case 2:
                if(256 - date < 0)
                {
                  Application->MessageBox("输入的数值应小于256us!!!!", "提示", 
                      MB_OK);
                      return;
                      

                }
                a = 256 - date;
                b = 256 - date;
                output1->Text = "0x"+ IntToHex(a,2);
                output2->Text = "0x"+ IntToHex(b,2);
                break;

        }
      
}
//---------------------------------------------------------------------------

void __fastcall TForm1::btn2Click(TObject *Sender)
{
exit(0);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btn3Click(TObject *Sender)
{
About->Show();
}
//---------------------------------------------------------------------------