Category

Development Platform
Home > E-Books > Visual C++ Books > View Code
Unit1.cpp
Package: C++Builder.rar　[view]
Upload User: lhxd_sz
Upload Date: 2014-10-02
Package Size: 38814k
Code Size: 3k
Category:

Visual C++ Books

Development Platform:

C++ Builder

Unit1.cpp：Code Content
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  5. #include "Unit1.h"
  6. //---------------------------------------------------------------------------
  7. #pragma package(smart_init)
  8. #pragma resource "*.dfm"
  9. TForm1 *Form1;
  10. //---------------------------------------------------------------------------
  11. __fastcall TForm1::TForm1(TComponent* Owner)
  12.         : TForm(Owner)
  13. {
  14. }
  15. //---------------------------------------------------------------------------
  16. void __fastcall TForm1::Button1Click(TObject *Sender)
  17. {
  18.   TRect rc;
  19.   rc.Left=0;
  20.   rc.Right=Image1->Width;
  21.   rc.Top=0;
  22.   rc.Bottom=Image1->Height;
  23.   Image1->Canvas->CopyMode=cmSrcPaint;
  24.   Image1->Canvas->CopyRect(rc,Image2->Canvas,rc);
  25. }
  26. //---------------------------------------------------------------------------
  27. void __fastcall TForm1::Button2Click(TObject *Sender)
  28. {
  29.   TRect rc;
  30.   Image3->Width=Image1->Width;
  31.   Image3->Height=Image1->Height;
  33.   rc.Left=0;
  34.   rc.Right=Image1->Width;
  35.   rc.Top=0;
  36.   rc.Bottom=Image1->Height;
  37.   Image3->Canvas->CopyMode=cmSrcCopy;
  38.   Image3->Canvas->CopyRect(rc,Image1->Canvas,rc);
  39.   Image1->Canvas->Brush->Color=clWhite;
  40.   Image1->Canvas->FillRect(rc);
  41.   ID=0;
  42.   Timer1->Enabled=True;
  43. }
  44. //---------------------------------------------------------------------------
  45. void __fastcall TForm1::PaintBlocks(int xbg,int ybg)
  46. {
  47.   TRect rc;
  48.   int CurX,CurY,xnn,ynn;
  49.   xnn=Image1->Width/10+1;
  50.   ynn=Image1->Height/10+1;
  51.   for(CurX=xbg;CurX<xnn;CurX+=2)
  52.     for(CurY=ybg;CurY<ynn;CurY+=2)
  53.     {
  54.       rc.Left=CurX*10;
  55.       rc.Right=rc.Left+10;
  56.       rc.Top=CurY*10;
  57.       rc.Bottom=rc.Top+10;
  58.       Image1->Canvas->CopyMode=cmSrcCopy;
  59.       Image1->Canvas->CopyRect(rc,Image3->Canvas,rc);
  60.     }
  61. }
  62. //---------------------------------------------------------------------------
  63. void __fastcall TForm1::Timer1Timer(TObject *Sender)
  64. {
  65.   if(ID==0)
  66.   {
  67.     PaintBlocks(0,0);
  68.   }
  69.   else if(ID==1)
  70.   {
  71.     PaintBlocks(1,1);
  72.   }
  73.   else if(ID==2)
  74.   {
  75.     PaintBlocks(1,0);
  76.   }
  77.   else
  78.   {
  79.     PaintBlocks(0,1);
  80.     Timer1->Enabled=False;
  81.   }
  82.   ID++;
  83. }
  84. //---------------------------------------------------------------------------
  85. void __fastcall TForm1::Button3Click(TObject *Sender)
  86. {
  87.   TRect rc;
  88.   rc.Left=0;
  89.   rc.Right=Image1->Width;
  90.   rc.Top=0;
  91.   rc.Bottom=Image1->Height;
  93.   Image1->Canvas->CopyMode=cmSrcPaint;
  94.   Image1->Canvas->CopyRect(rc,Image2->Canvas,rc);
  96.   Image4->Canvas->CopyMode=cmMergePaint;
  97.   Image4->Canvas->CopyRect(rc,Image2->Canvas,rc);
  99.   Image1->Canvas->CopyMode=cmSrcAnd;
  100.   Image1->Canvas->CopyRect(rc,Image4->Canvas,rc);
  101. }
  102. //---------------------------------------------------------------------------