unit1.~cpp

武安河书第一版（vxd）Windows 驱动例子

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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"
#include "Unit3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
int i;
TSimpleEvent* TSEvent;
TForm1 *Form1;
thread2 *SecondProcess;
thread3 *ThirdProcess;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
        SecondProcess->Resume();
        ThirdProcess->Resume();
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
        this->Caption="VxD应用";
        TSEvent=new TSimpleEvent();
        SecondProcess = new thread2(true);
        SecondProcess->Priority = tpLower;
        ThirdProcess = new thread3(true);
        ThirdProcess->Priority = tpLower;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
        exit(EXIT_SUCCESS);
}
//---------------------------------------------------------------------------