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 Set
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
{
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
}
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键,还可以显示用户按下 的是鼠标左键还是右键。代码中说明了如何使用交集、并集和差集运算符。