VWRR・WIKIBOX建築mome・メーカー
図形をY方向へ複製します。 procedure yCopy;{y方向複製コマンド} var dy: real; begin dy := DistDialog('Y方向の移動距離(複製)','0'); Duplicate (0,dy); end; run ( yCopy );