setdlg.~cpp

该程序实现了Delaunay三角剖分的过程

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

#include <vcl.h>
#pragma hdrstop

#include "SetDlg.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TTSetDlg *TSetDlg;
//---------------------------------------------------------------------------
__fastcall TTSetDlg::TTSetDlg(TComponent* Owner)
    : TForm(Owner)
{

}
//---------------------------------------------------------------------------

void __fastcall TTSetDlg::FormCreate(TObject *Sender)
{
    int i;
    AnsiString str;
    for(i=0; i<8; i++)
    {
        StringGrid1->Cells[0][2*i] = str.sprintf("P%d(x)",i+1);
        StringGrid1->Cells[0][2*i+1] = str.sprintf("P%d(y)",i+1);
        StringGrid1->Cells[0][16+i] = str.sprintf("n%d",i+1);
    }
}
//---------------------------------------------------------------------------