首先看一看窗口的MouseDown事件的聲明
void __fastcall TForm1::FormMouseDown(TObject *Sender,TMouseButton Button,TShiftState Shift,int X,int Y)
其中的Shift參數被說明為TShiftState類型：
enum Classes_1{ssShift,ssAlt,ssCtrl,ssRight,ssMiddle,ssDouble};
typedef SetTShiftSTate;
TShiftSTate是一個集合(Set)，也就是說，TShiftState是Sysdefs.h中Set模板類的一個實例。如果想要知道某個元素是不是集合中的一個成員，可以使用Contains方法：
ShiftKey->Checked=Shift.Contains(ssShift);
ControlKey->Checked=Shift.Contains(ssCtrl);
LeftButton->Checked=Shift.Contains(ssLeft);
RightButton->Checked=Shift.Contains(ssRight);
這段代碼詢問元素ssRight是不是屬於Shift集合。如果是的話，那麼代碼就設置為TCheckBox組件的狀態。
下面是在運行狀態下說明一個集合的方法：
TShiftState LeftShift;
LeftShift<
對於上面這個集合，如果詢問集合中是否包含ssLeft或ssShift, 那麼Contains運算符將返回True值。
除了Contains方法外，還可以在Set類中使用下面三個運算符：
+ 並集
- 差集
* 交集
上面這三個運算符都返回一個集合，而Contains返回一個布爾值。
SETEXP程序
如下面程序清單所示，SETEXP程序說明了如何使用Set模板類中的關鍵元素。
///////////////////////////////////////
// File: Main.cpp
// Project: SetExp
// Creator: Copyright 1998 by Charlie Calvert
//
#include
#pragma hdrstop
#include "Main.h"
#pragma resource "*.dfm"
TForm1 *Form1;
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
void TForm1::CheckState(TShiftState Shift)
{
ShiftKey->Checked = Shift.Contains(ssShift);
ControlKey->Checked = Shift.Contains(ssCtrl);
LeftButton->Checked = Shift.Contains(ssLeft);
RightButton->Checked = Shift.Contains(ssRight);
}
void __fastcall TForm1::UnionClick(TObject *Sender)
{
AnsiString Operators[3] = {"+", "*", "-"};
TShiftState FinalSet;
TShiftState LeftShift;
TShiftState LeftCtrl;
LeftShift << ssLeft << ssShift;
LeftCtrl << ssLeft << ssCtrl;
switch (TOptType(dynamic_cast (Sender)->Tag))
{
case otUnion:
FinalSet = LeftShift + LeftCtrl;
break;
case otIntersection:
FinalSet = LeftShift * LeftCtrl;
break;
case otDifference:
FinalSet = LeftShift - LeftCtrl;
break;
}
CheckState(FinalSet);
Label2->Caption = Operators[dynamic_cast(Sender)->Tag];
}
void __fastcall TForm1::Label4MouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
CheckState(Shift);
}
SetExp程序說明了如何對集合進行訪問和操作。尤其是程序中使用了TShiftState類型的集合。通過這個示例程序可以學習使用C++Builder集合所需的內容。
SETEXP程序的主窗口包含了4個TCheckBox、2個TPanel、4個TLabel和3個TBitBtn對象。4個TCheckBox對象放置在第一個TPanel對象的上面，第4個TLabel對象放置在第二個TPanel對象的上面。
SETEXP程序可以顯示在單擊鼠標時，是否按下了Shift鍵或Ctrl鍵，還可以顯示用戶按下 的是鼠標左鍵還是右鍵。代碼中說明了如何使用交集、並集和差集運算符。
