Delphi
/
GLScene
镜像来自 https://github.com/glscene/GLScene


			
				
					
						
						
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137
							<html>

<head>
<meta http-equiv=Content-Type content="text/html; charset=windows-1252">
<meta name=Generator content="Microsoft Word 15 (filtered)">
<title>Extrusion demos</title>
<style>
<!--
 /* Font Definitions */
 @font-face
	{font-family:Wingdings;
	panose-1:5 0 0 0 0 0 0 0 0 0;}
@font-face
	{font-family:"Cambria Math";
	panose-1:2 4 5 3 5 4 6 3 2 4;}
@font-face
	{font-family:Consolas;
	panose-1:2 11 6 9 2 2 4 3 2 4;}
 /* Style Definitions */
 p.MsoNormal, li.MsoNormal, div.MsoNormal
	{margin:0cm;
	margin-bottom:.0001pt;
	font-size:12.0pt;
	font-family:"Times New Roman",serif;}
a:link, span.MsoHyperlink
	{color:blue;
	text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
	{color:purple;
	text-decoration:underline;}
p.MsoPlainText, li.MsoPlainText, div.MsoPlainText
	{mso-style-link:"\0422\0435\043A\0441\0442 \0417\043D\0430\043A";
	margin-right:0cm;
	margin-left:0cm;
	font-size:12.0pt;
	font-family:"Times New Roman",serif;}
p.msonormal0, li.msonormal0, div.msonormal0
	{mso-style-name:msonormal;
	margin-right:0cm;
	margin-left:0cm;
	font-size:12.0pt;
	font-family:"Times New Roman",serif;}
span.a
	{mso-style-name:"\0422\0435\043A\0441\0442 \0417\043D\0430\043A";
	mso-style-link:\0422\0435\043A\0441\0442;
	font-family:Consolas;}
.MsoChpDefault
	{font-size:10.0pt;}
@page WordSection1
	{size:595.3pt 841.9pt;
	margin:2.0cm 42.5pt 2.0cm 3.0cm;}
div.WordSection1
	{page:WordSection1;}
 /* List Definitions */
 ol
	{margin-bottom:0cm;}
ul
	{margin-bottom:0cm;}
-->
</style>

</head>

<body bgcolor=white lang=RU link=blue vlink=purple>

<div class=WordSection1>

<p class=MsoPlainText><b><span lang=FR style='font-size:13.5pt;font-family:
"Courier New"'>Extrusion&nbsp;:</span></b></p>

<ul type=disc>
 <li class=MsoNormal><span lang=FR><a href="BendingCyl.dpr"><b>BendingCyl</b></a><b>&nbsp;:</b></span></li>
 <ul type=circle>
  <li class=MsoNormal><span lang=FR>uses TPipe, the circle extrusion component</span></li>
  <li class=MsoNormal><span lang=FR>a bending cylinder getting fat/slim</span></li>
 </ul>
</ul>

<p class=MsoNormal><img border=0 width=624 height=475 src=BendingCyl.jpg></p>

<ul type=disc>
 <li class=MsoNormal><span lang=FR><a href="CutoutStar.dpr"><strong>CutoutStar</strong></a>
     :</span></li>
 <ul type=circle>
  <li class=MsoNormal><span lang=FR>using TExtrusionSolid to render an extruded
      object</span></li>
  <li class=MsoNormal><span lang=FR>cutting out parts in a TExtrusionSolid (or
      TMultiPolygon)</span></li>
 </ul>
</ul>

<p class=MsoNormal><img border=0 width=624 height=498 src=CutoutStar.jpg></p>

<ul type=disc>
 <li class=MsoNormal><span lang=FR><a href="NutsnBolts.dpr"><b>NutsnBolts</b></a><b>&nbsp;:</b></span></li>
 <ul type=circle>
  <li class=MsoNormal><span lang=FR>a no-code, design-time only sample
      rendering of a nut and accompanying bolt</span></li>
  <li class=MsoNormal><span lang=FR>uses TRevolutionSolid, TCylinder and
      TAnnulus to build both items</span></li>
 </ul>
</ul>

<p class=MsoNormal><img border=0 width=624 height=494 src=NutsnBolts.jpg></p>

<ul type=disc>
 <li class=MsoNormal><span lang=FR><a href="Pawn.dpr"><b>Pawn</b></a><b>&nbsp;:</b></span></li>
 <ul type=circle>
  <li class=MsoNormal><span lang=FR>basic TRevolutionSolid use to make a
      wood-textured pawn-like object</span></li>
  <li class=MsoNormal><span lang=FR>various interactive controls to check the
      effects of various properties on visual aspect</span></li>
 </ul>
</ul>

<p class=MsoNormal><img border=0 width=624 height=506 src=Pawn.jpg></p>

<ul type=disc>
 <li class=MsoNormal><span lang=FR><a href="Tentacles.dpr"><b>Tentacles</b></a>
     :</span></li>
 <ul type=circle>
  <li class=MsoNormal><span lang=FR>using TPipe for weirdo tentacles effects,
      per-node coloring</span></li>
  <li class=MsoNormal><span lang=FR>adjusting ObjectStyle to speed up rendering
      of constantly changing geometry</span></li>
 </ul>
</ul>

<p class=MsoNormal><img border=0 width=577 height=445 src=Tentacles.jpg></p>

<p class=MsoNormal><span lang=FR><a href="../demos.htm">Back</a></span></p>

</div>

</body>

</html>