C++Builder Tips



マウスボタンの判定


Shift.Containsってなんか忘れません？

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

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
TShiftState Shift, int X, int Y)
{
ListBox1->Items->Clear();

//Shiftキーが押されている
if (Shift.Contains(ssShift)){
ListBox1->Items->Add("ssShift");
}
//Ctrlキーが押されている
if (Shift.Contains(ssCtrl)){
ListBox1->Items->Add("ssCtrl");
}
//Altキーが押されている
if (Shift.Contains(ssAlt)){
ListBox1->Items->Add("ssAlt");
}