DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: xjhbbs
今日帖子: 9
在线用户: 9
导航: 论坛 -> 信息交换 斑竹:huadugaojian,sunyesy,huangjacky  
作者:
男 kapennyka (kaka) ★☆☆☆☆ -
普通会员
2006/7/8 14:51:28
标题:
300元悬赏求助:DELPHI 7 函数 浏览:1796
加入我的收藏
楼主: 因图片无法显示,请下载附件

图1
以上是两个完全相同的图对象A摆在长X宽Y的区域内最多能摆多少个,不能重叠,不能超出XY的范围,使得浪费(不能被图对象A占据的部分)的区域的面积最小,摆好的示意图自动画出。


图2
以上是两个不同的图对象A、B,A和B的个数比假设指定为F,F为NA/NB的浮点数(NA、NB为整数),摆在长X宽Y的区域内最多能摆多少个A和多少个B,不能重叠,不能超出XY的范围,使得浪费(不能被图对象A、B占据的部分)的区域的面积最小,摆好的示意图自动画出。

对象代码:  TOperatorType=(otNone,otDrawLine,otSelect);
  TAPoint=Array of TPoint;
  TPointthList=Array of integer;
  TLine=Class//线对象.
  Public
    Selected,EnDraw:Boolean;
    ProductId:string;
    HeadX,HeadY,CAngle:integer;
    PointList:TAPoint;//线对象的点列表.是记录上图所示结点的表
    PointsthList:TPointthList; //记录线拥有原型的哪些点
    SplitFlag:integer;
此帖子包含附件:kapennyka_200678145128.doc 大小:42.0K
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行117.1875毫秒 RSS