Codigo Para Efecto De Lineas Y Sombras En C++

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

#include
#pragma hdrstop

#include "Unit1.h"
#include "Unit2.h"//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcallTForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormResize(TObject *Sender)
{
//Sila forma se redimensiona actualizar todo
//a sus nuevas dimensiones
Invalidate();
}
//---------------------------------------------------------------------------
void __fastcallTForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
if(mover)
{
mx=X;
my=Y;
this->Refresh();
this->Paint();
}
}//---------------------------------------------------------------------------
void __fastcall TForm1::FormClick(TObject *Sender)
{
if(click==0)
{
click=1;
mover=false;
}
else
{
click=0;mover=true;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
mover=true;this->DoubleBuffered=true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormPaint(TObject *Sender)
{
int Contador = 0;
// Líneas con trazodiscontinuo
switch(l)
{
case 0: Canvas->Pen->Style = psSolid;
break;
case 1: Canvas->Pen->Style = psDot;
break;
case 2: Canvas->Pen->Style = psDashDotDot;break;
case 3: Canvas->Pen->Style = psDashDot;
break;
case 4: Canvas->Pen->Style = psDash;
break;
}
// Calcular el centro del área de dibujo
//...