dgalproc.pas

KSDev.BlockEngine.v3.03.rar 界面控件

  Path.AddLine(0.26 * Width, 0.381 * Height, 0.281 * Width, 0.393 * Height);
  Path.AddLine(0.281 * Width, 0.393 * Height, 0.295 * Width, 0.401 * Height);
  Path.AddLine(0.295 * Width, 0.401 * Height, 0.307 * Width, 0.409 * Height);
  Path.AddLine(0.307 * Width, 0.409 * Height, 0.322 * Width, 0.433 * Height);
  Path.AddLine(0.322 * Width, 0.433 * Height, 0.33 * Width, 0.462 * Height);
  Path.AddLine(0.33 * Width, 0.462 * Height, 0.365 * Width, 0.425 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.333 * Width, 0.514 * Height, 0.327 * Width, 0.555 * Height);
  Path.AddLine(0.327 * Width, 0.555 * Height, 0.313 * Width, 0.583 * Height);
  Path.AddLine(0.313 * Width, 0.583 * Height, 0.301 * Width, 0.595 * Height);
  Path.AddLine(0.301 * Width, 0.595 * Height, 0.287 * Width, 0.603 * Height);
  Path.AddLine(0.287 * Width, 0.603 * Height, 0.263 * Width, 0.615 * Height);
  Path.AddLine(0.263 * Width, 0.615 * Height, 0.24 * Width, 0.628 * Height);
  Path.AddLine(0.24 * Width, 0.628 * Height, 0.181 * Width, 0.652 * Height);
  Path.AddLine(0.181 * Width, 0.652 * Height, 0.143 * Width, 0.668 * Height);
  Path.AddLine(0.143 * Width, 0.668 * Height, 0.114 * Width, 0.688 * Height);
  Path.AddLine(0.114 * Width, 0.688 * Height, 0.0906 * Width, 0.704 * Height);
  Path.AddLine(0.0906 * Width, 0.704 * Height, 0.0731 * Width, 0.721 * Height);
  Path.AddLine(0.0731 * Width, 0.721 * Height, 0.0614 * Width, 0.741 * Height);
  Path.AddLine(0.0614 * Width, 0.741 * Height, 0.0526 * Width, 0.761 * Height);
  Path.AddLine(0.0526 * Width, 0.761 * Height, 0.0468 * Width, 0.789 * Height);
  Path.AddLine(0.0468 * Width, 0.789 * Height, 0.0439 * Width, 0.818 * Height);
  Path.AddLine(0.0439 * Width, 0.818 * Height, 0.0468 * Width, 0.842 * Height);
  Path.AddLine(0.0468 * Width, 0.842 * Height, 0.0497 * Width, 0.866 * Height);
  Path.AddLine(0.0497 * Width, 0.866 * Height, 0.0585 * Width, 0.887 * Height);
  Path.AddLine(0.0585 * Width, 0.887 * Height, 0.0731 * Width, 0.907 * Height);
  Path.AddLine(0.0731 * Width, 0.907 * Height, 0.0877 * Width, 0.923 * Height);
  Path.AddLine(0.0877 * Width, 0.923 * Height, 0.102 * Width, 0.935 * Height);
  Path.AddLine(0.102 * Width, 0.935 * Height, 0.12 * Width, 0.943 * Height);
  Path.AddLine(0.12 * Width, 0.943 * Height, 0.14 * Width, 0.943 * Height);
  Path.AddLine(0.14 * Width, 0.943 * Height, 0.164 * Width, 0.939 * Height);
  Path.AddLine(0.164 * Width, 0.939 * Height, 0.19 * Width, 0.931 * Height);
  Path.AddLine(0.19 * Width, 0.931 * Height, 0.211 * Width, 0.911 * Height);
  Path.AddLine(0.211 * Width, 0.911 * Height, 0.231 * Width, 0.887 * Height);
  Path.AddLine(0.231 * Width, 0.887 * Height, 0.249 * Width, 0.858 * Height);
  Path.AddLine(0.249 * Width, 0.858 * Height, 0.263 * Width, 0.83 * Height);
  Path.AddLine(0.263 * Width, 0.83 * Height, 0.269 * Width, 0.794 * Height);
  Path.AddLine(0.269 * Width, 0.794 * Height, 0.272 * Width, 0.761 * Height);
  Path.AddLine(0.272 * Width, 0.761 * Height, 0.272 * Width, 0.745 * Height);
  Path.AddLine(0.272 * Width, 0.745 * Height, 0.269 * Width, 0.729 * Height);
  Path.AddLine(0.269 * Width, 0.729 * Height, 0.269 * Width, 0.709 * Height);
  Path.AddLine(0.269 * Width, 0.709 * Height, 0.272 * Width, 0.672 * Height);
  Path.AddLine(0.272 * Width, 0.672 * Height, 0.287 * Width, 0.644 * Height);
  Path.AddLine(0.287 * Width, 0.644 * Height, 0.295 * Width, 0.632 * Height);
  Path.AddLine(0.295 * Width, 0.632 * Height, 0.313 * Width, 0.615 * Height);
  Path.AddLine(0.313 * Width, 0.615 * Height, 0.333 * Width, 0.595 * Height);
  Path.AddLine(0.333 * Width, 0.595 * Height, 0.36 * Width, 0.575 * Height);
  Path.AddLine(0.36 * Width, 0.575 * Height, 0.933 * Width, 0.134 * Height);
  Path.AddLine(0.933 * Width, 0.134 * Height, 0.909 * Width, 0.117 * Height);
  Path.AddLine(0.909 * Width, 0.117 * Height, 0.883 * Width, 0.105 * Height);
  Path.AddLine(0.883 * Width, 0.105 * Height, 0.854 * Width, 0.101 * Height);
  Path.AddLine(0.854 * Width, 0.101 * Height, 0.819 * Width, 0.0972 * Height);
  Path.AddLine(0.819 * Width, 0.0972 * Height, 0.333 * Width, 0.514 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.5 * Width, 0.53 * Height, 0.439 * Width, 0.579 * Height);
  Path.AddLine(0.439 * Width, 0.579 * Height, 0.822 * Width, 0.907 * Height);
  Path.AddLine(0.822 * Width, 0.907 * Height, 0.825 * Width, 0.907 * Height);
  Path.AddLine(0.825 * Width, 0.907 * Height, 0.857 * Width, 0.907 * Height);
  Path.AddLine(0.857 * Width, 0.907 * Height, 0.886 * Width, 0.899 * Height);
  Path.AddLine(0.886 * Width, 0.899 * Height, 0.912 * Width, 0.887 * Height);
  Path.AddLine(0.912 * Width, 0.887 * Height, 0.936 * Width, 0.87 * Height);
  Path.AddLine(0.936 * Width, 0.87 * Height, 0.5 * Width, 0.53 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.173 * Width, 0.316 * Height, 0.158 * Width, 0.304 * Height);
  Path.AddLine(0.158 * Width, 0.304 * Height, 0.135 * Width, 0.291 * Height);
  Path.AddLine(0.135 * Width, 0.291 * Height, 0.114 * Width, 0.279 * Height);
  Path.AddLine(0.114 * Width, 0.279 * Height, 0.0965 * Width, 0.267 * Height);
  Path.AddLine(0.0965 * Width, 0.267 * Height, 0.0819 * Width, 0.251 * Height);
  Path.AddLine(0.0819 * Width, 0.251 * Height, 0.0731 * Width, 0.235 * Height);
  Path.AddLine(0.0731 * Width, 0.235 * Height, 0.0643 * Width, 0.219 * Height);
  Path.AddLine(0.0643 * Width, 0.219 * Height, 0.0614 * Width, 0.202 * Height);
  Path.AddLine(0.0614 * Width, 0.202 * Height, 0.0585 * Width, 0.182 * Height);
  Path.AddLine(0.0585 * Width, 0.182 * Height, 0.0614 * Width, 0.162 * Height);
  Path.AddLine(0.0614 * Width, 0.162 * Height, 0.0643 * Width, 0.146 * Height);
  Path.AddLine(0.0643 * Width, 0.146 * Height, 0.0731 * Width, 0.13 * Height);
  Path.AddLine(0.0731 * Width, 0.13 * Height, 0.0819 * Width, 0.113 * Height);
  Path.AddLine(0.0819 * Width, 0.113 * Height, 0.108 * Width, 0.0891 * Height);
  Path.AddLine(0.108 * Width, 0.0891 * Height, 0.14 * Width, 0.081 * Height);
  Path.AddLine(0.14 * Width, 0.081 * Height, 0.161 * Width, 0.085 * Height);
  Path.AddLine(0.161 * Width, 0.085 * Height, 0.181 * Width, 0.0931 * Height);
  Path.AddLine(0.181 * Width, 0.0931 * Height, 0.202 * Width, 0.109 * Height);
  Path.AddLine(0.202 * Width, 0.109 * Height, 0.222 * Width, 0.13 * Height);
  Path.AddLine(0.222 * Width, 0.13 * Height, 0.237 * Width, 0.158 * Height);
  Path.AddLine(0.237 * Width, 0.158 * Height, 0.249 * Width, 0.182 * Height);
  Path.AddLine(0.249 * Width, 0.182 * Height, 0.254 * Width, 0.211 * Height);
  Path.AddLine(0.254 * Width, 0.211 * Height, 0.257 * Width, 0.239 * Height);
  Path.AddLine(0.257 * Width, 0.239 * Height, 0.254 * Width, 0.279 * Height);
  Path.AddLine(0.254 * Width, 0.279 * Height, 0.246 * Width, 0.308 * Height);
  Path.AddLine(0.246 * Width, 0.308 * Height, 0.231 * Width, 0.328 * Height);
  Path.AddLine(0.231 * Width, 0.328 * Height, 0.208 * Width, 0.332 * Height);
  Path.AddLine(0.208 * Width, 0.332 * Height, 0.193 * Width, 0.328 * Height);
  Path.AddLine(0.193 * Width, 0.328 * Height, 0.173 * Width, 0.316 * Height);
  Path.AddLine(0.173 * Width, 0.316 * Height, 0.173 * Width, 0.316 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.132 * Width, 0.7 * Height, 0.173 * Width, 0.68 * Height);
  Path.AddLine(0.173 * Width, 0.68 * Height, 0.205 * Width, 0.672 * Height);
  Path.AddLine(0.205 * Width, 0.672 * Height, 0.228 * Width, 0.68 * Height);
  Path.AddLine(0.228 * Width, 0.68 * Height, 0.246 * Width, 0.696 * Height);
  Path.AddLine(0.246 * Width, 0.696 * Height, 0.254 * Width, 0.725 * Height);
  Path.AddLine(0.254 * Width, 0.725 * Height, 0.257 * Width, 0.757 * Height);
  Path.AddLine(0.257 * Width, 0.757 * Height, 0.254 * Width, 0.789 * Height);
  Path.AddLine(0.254 * Width, 0.789 * Height, 0.249 * Width, 0.818 * Height);
  Path.AddLine(0.249 * Width, 0.818 * Height, 0.237 * Width, 0.846 * Height);
  Path.AddLine(0.237 * Width, 0.846 * Height, 0.222 * Width, 0.87 * Height);
  Path.AddLine(0.222 * Width, 0.87 * Height, 0.205 * Width, 0.891 * Height);
  Path.AddLine(0.205 * Width, 0.891 * Height, 0.184 * Width, 0.907 * Height);
  Path.AddLine(0.184 * Width, 0.907 * Height, 0.164 * Width, 0.915 * Height);
  Path.AddLine(0.164 * Width, 0.915 * Height, 0.14 * Width, 0.919 * Height);
  Path.AddLine(0.14 * Width, 0.919 * Height, 0.111 * Width, 0.911 * Height);
  Path.AddLine(0.111 * Width, 0.911 * Height, 0.0848 * Width, 0.891 * Height);
  Path.AddLine(0.0848 * Width, 0.891 * Height, 0.0731 * Width, 0.874 * Height);
  Path.AddLine(0.0731 * Width, 0.874 * Height, 0.0643 * Width, 0.858 * Height);
  Path.AddLine(0.0643 * Width, 0.858 * Height, 0.0614 * Width, 0.838 * Height);
  Path.AddLine(0.0614 * Width, 0.838 * Height, 0.0585 * Width, 0.818 * Height);
  Path.AddLine(0.0585 * Width, 0.818 * Height, 0.0643 * Width, 0.781 * Height);
  Path.AddLine(0.0643 * Width, 0.781 * Height, 0.076 * Width, 0.753 * Height);
  Path.AddLine(0.076 * Width, 0.753 * Height, 0.0994 * Width, 0.725 * Height);
  Path.AddLine(0.0994 * Width, 0.725 * Height, 0.132 * Width, 0.7 * Height);
  Path.AddLine(0.132 * Width, 0.7 * Height, 0.132 * Width, 0.7 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.164 * Width, 0.259 * Height, 0.181 * Width, 0.267 * Height);
  Path.AddLine(0.181 * Width, 0.267 * Height, 0.193 * Width, 0.275 * Height);
  Path.AddLine(0.193 * Width, 0.275 * Height, 0.205 * Width, 0.275 * Height);
  Path.AddLine(0.205 * Width, 0.275 * Height, 0.208 * Width, 0.275 * Height);
  Path.AddLine(0.208 * Width, 0.275 * Height, 0.211 * Width, 0.267 * Height);
  Path.AddLine(0.211 * Width, 0.267 * Height, 0.213 * Width, 0.259 * Height);
  Path.AddLine(0.213 * Width, 0.259 * Height, 0.213 * Width, 0.239 * Height);
  Path.AddLine(0.213 * Width, 0.239 * Height, 0.213 * Width, 0.223 * Height);
  Path.AddLine(0.213 * Width, 0.223 * Height, 0.208 * Width, 0.202 * Height);
  Path.AddLine(0.208 * Width, 0.202 * Height, 0.199 * Width, 0.186 * Height);
  Path.AddLine(0.199 * Width, 0.186 * Height, 0.19 * Width, 0.17 * Height);
  Path.AddLine(0.19 * Width, 0.17 * Height, 0.164 * Width, 0.146 * Height);
  Path.AddLine(0.164 * Width, 0.146 * Height, 0.137 * Width, 0.138 * Height);
  Path.AddLine(0.137 * Width, 0.138 * Height, 0.126 * Width, 0.142 * Height);
  Path.AddLine(0.126 * Width, 0.142 * Height, 0.114 * Width, 0.154 * Height);
  Path.AddLine(0.114 * Width, 0.154 * Height, 0.105 * Width, 0.17 * Height);
  Path.AddLine(0.105 * Width, 0.17 * Height, 0.102 * Width, 0.186 * Height);
  Path.AddLine(0.102 * Width, 0.186 * Height, 0.105 * Width, 0.202 * Height);
  Path.AddLine(0.105 * Width, 0.202 * Height, 0.117 * Width, 0.223 * Height);
  Path.AddLine(0.117 * Width, 0.223 * Height, 0.137 * Width, 0.239 * Height);
  Path.AddLine(0.137 * Width, 0.239 * Height, 0.164 * Width, 0.259 * Height);
  Path.AddLine(0.164 * Width, 0.259 * Height, 0.164 * Width, 0.259 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.181 * Width, 0.737 * Height, 0.161 * Width, 0.749 * Height);
  Path.AddLine(0.161 * Width, 0.749 * Height, 0.135 * Width, 0.765 * Height);
  Path.AddLine(0.135 * Width, 0.765 * Height, 0.117 * Width, 0.785 * Height);
  Path.AddLine(0.117 * Width, 0.785 * Height, 0.105 * Width, 0.802 * Height);
  Path.AddLine(0.105 * Width, 0.802 * Height, 0.102 * Width, 0.818 * Height);
  Path.AddLine(0.102 * Width, 0.818 * Height, 0.105 * Width, 0.834 * Height);
  Path.AddLine(0.105 * Width, 0.834 * Height, 0.114 * Width, 0.85 * Height);
  Path.AddLine(0.114 * Width, 0.85 * Height, 0.126 * Width, 0.858 * Height);
  Path.AddLine(0.126 * Width, 0.858 * Height, 0.14 * Width, 0.862 * Height);
  Path.AddLine(0.14 * Width, 0.862 * Height, 0.167 * Width, 0.854 * Height);
  Path.AddLine(0.167 * Width, 0.854 * Height, 0.19 * Width, 0.834 * Height);
  Path.AddLine(0.19 * Width, 0.834 * Height, 0.208 * Width, 0.802 * Height);
  Path.AddLine(0.208 * Width, 0.802 * Height, 0.213 * Width, 0.761 * Height);
  Path.AddLine(0.213 * Width, 0.761 * Height, 0.213 * Width, 0.745 * Height);
  Path.AddLine(0.213 * Width, 0.745 * Height, 0.211 * Width, 0.737 * Height);
  Path.AddLine(0.211 * Width, 0.737 * Height, 0.202 * Width, 0.729 * Height);
  Path.AddLine(0.202 * Width, 0.729 * Height, 0.196 * Width, 0.733 * Height);
  Path.AddLine(0.196 * Width, 0.733 * Height, 0.181 * Width, 0.737 * Height);
  Path.AddLine(0.181 * Width, 0.737 * Height, 0.181 * Width, 0.737 * Height);
  Path.CloseFigure;
  Path.StartFigure;
  Path.AddLine(0.371 * Width, 0.502 * Height, 0.374 * Width, 0.482 * Height);
  Path.AddLine(0.374 * Width, 0.482 * Height, 0.38 * Width, 0.47 * Height);
  Path.AddLine(0.38 * Width, 0.47 * Height, 0.392 * Width, 0.462 * Height);
  Path.AddLine(0.392 * Width, 0.462 * Height, 0.406 * Width, 0.457 * Height);
  Path.AddLine(0.406 * Width, 0.457 * Height, 0.421 * Width, 0.462 * Height);
  Path.AddLine(0.421 * Width, 0.462 * Height, 0.433 * Width, 0.47 * Height);
  Path.AddLine(0.433 * Width, 0.47 * Height, 0.439 * Width, 0.482 * Height);
  Path.AddLine(0.439 * Width, 0.482 * Height, 0.442 * Width, 0.502 * Height);
  Path.AddLine(0.442 * Width, 0.502 * Height, 0.439 * Width, 0.518 * Height);
  Path.AddLine(0.439 * Width, 0.518 * Height, 0.433 * Width, 0.53 * Height);
  Path.AddLine(0.433 * Width, 0.53 * Height, 0.421 * Width, 0.538 * Height);
  Path.AddLine(0.421 * Width, 0.538 * Height, 0.406 * Width, 0.543 * Height);
  Path.AddLine(0.406 * Width, 0.543 * Height, 0.392 * Width, 0.538 * Height);
  Path.AddLine(0.392 * Width, 0.538 * Height, 0.38 * Width, 0.53 * Height);
  Path.AddLine(0.38 * Width, 0.53 * Height, 0.374 * Width, 0.518 * Height);