ExPolygon.dpr 412 B

123456789101112131415161718
  1. {: TGLMultiPolygon Sample, contributed by Uwe Raabe.
  2. Note: this sample has been partly obsoleted/superseded by the TGLExtrusionSolid
  3. (by Uwe Raabe), which allows building such solids directly.
  4. }
  5. program ExPolygon;
  6. uses
  7. Forms,
  8. fExPolygon in 'fExPolygon.pas' {FormExPolygon};
  9. {$R *.RES}
  10. begin
  11. Application.Initialize;
  12. Application.CreateForm(TFormExPolygon, FormExPolygon);
  13. Application.Run;
  14. end.