窗体绘制菱形

[mazhichao84]

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

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::PaintBox1Click(TObject *Sender)
{
POINT vertices[5];
vertices[0]=Point(0,0);
vertices[1]=Point(50,0);
vertices[2]=Point(75,50);
vertices[3]=Point(25,50);
vertices[4]=Point(0,0);//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::PaintBox1Click(TObject *Sender)
{
POINT vertices[5];
vertices[0]=Point(0,0);
vertices[1]=Point(50,0);
vertices[2]=Point(75,50);
vertices[3]=Point(25,50);
vertices[4]=Point(0,0);
Canvas->Polyline(vertices,4);
}
//---------------------------------------------------------------------------

Canvas->Polyline(vertices,4);
}
//---------------------------------------------------------------------------
为什么不能运行？出现错误
麻烦哪位高手指点一下，谢谢！！

[YeBinYe]

PaintBox1->Canvas->Polyline(Slice(vertices,4));

[YeBinYe]

或者PaintBox1->Canvas->Polyline(vertices,5);

[mazhichao84]

老兄，还是不行啊
出现同样的错误提醒！！！！

[ccrun.com]

最根本的原因是Polyline函数的第一个参数是TPoint *,而不是POINT *
所以,只需将POINT换成TPoint就可以了.如

TPoint vertices[5];

[mazhichao84]

多谢指点！！！
解决啦