u7_4_1.cpp

《C++ Builder 5程序设计——基础教学篇》程序源代码2.

//--------------------  u7_4_1  -------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "u7_4_1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
Tf7_4_1 *f7_4_1;
//---------------------------------------------------------------------------
__fastcall Tf7_4_1::Tf7_4_1(TComponent* Owner)
    : TForm(Owner)
{
}
//--------------------------------------------------------------------------
void __fastcall Tf7_4_1::FormCreate(TObject *Sender)
{
  shpUp1->Pen->Mode=pmNotCopy;
  shpUp2->Pen->Mode=pmMask;
  shpUp3->Pen->Mode=pmNop;
  shpUp4->Pen->Mode=pmMerge;
}
//---------------------------------------------------------------------------