高价求学点阵图!!!(200分)

  • 主题发起人 主题发起人 wangchaomin
  • 开始时间 开始时间
W

wangchaomin

Unregistered / Unconfirmed
GUEST, unregistred user!
小弟因工作需要一个自绘程序,让用户在一个点阵图上画图,并能保存。
小弟感到无从下手,特此向各位高手请教。最好有源码
 
我的设想:),不知道有没有用,应该可以实现:
所谓点阵图,与用画笔在canvas上画的图当然不同(废话,呵呵)
1、在一个panal中放50*50的shape组件,(shape属性:stCircle);
2、编写代码:
定义全局变量IsDraw:boolean
(画图)
Isdraw := true;
在shape组件的mousemove事件中:当鼠标左键按下时,则该
shape 的颜色变成红色;

(擦图)
Isdraw :=false;
同上,当鼠标左键按下时,该shape变成原来的颜色;

(保存)
建立一个文本文件(后缀不一定是txt,可以任取);
依次对每个shape判断,如果是红色的,赋值为1;原色的话,赋值为0;按照
次序写入到文本文件中。(要注意写入的次序,一一对应);

(打开文件)
那就很好办了,依照文件中的赋值情况,一一对shape的颜色赋值,就OK了。

建议:我只是写了个大概的东西,是思路,如果是我自己做,也是这个思路,应该
不会太难的,呵呵。其中的变量你可以自己定义,包括点阵图的大小等等。

欢迎交流:zhqgege@163.net
 
有道理,但那样不会太乱费
 
设定一位图,大小可由一编辑窗口设定:
然后,当鼠标点下时,把对应的点的颜色改变即可。
 
您可以用DELPHI的例子程序 graphex.
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部