ノイズ作成用ユニット NoiseUnit

追加説明

- 追加説明 -
【 新しくなった点 】
// Version 0.5 //
・procedure GridDraw() 以下の様に修正しました。DColor パラメータを追加し、
描画範囲の中で指定した色の部分のみに描画する事が可能となりました。また
従来の R: TRect; パラメータを
LT, RB: TPoint; // 描画範囲の左上と右下の点
に変更しました。

・FreePoligon(), FreeRectangle(), FreeEllipse() 手続きに Fill パラメータを
追加し、内部の塗りつぶし方を指定する値を指定出来る様になりました。これに
より、内部を特定の色や雲の画像で塗りつぶす事が可能となりました。

・function adjPoints(), function ExistColor(), function NonExistColor(),
procedure ExceptColor() を追加しました。詳しくはソースを御覧下さい。