利用字符串动态生成图形

每个图形在内存中都有与它想对应的字符串。我们可以用SaveToBuffer()把某个图形保存到内存字符串。同样我们也可以用LoadFromBuffer()通过字符串来生成图形。首先，在集成开发环境中绘制下面的表格：

circle	<circle name="circle1" bounds="0,0,84,50" origin="42,25" pattern="1"/>
line	<line name="line1" origin="52,25" pattern="1" points="0,24,6 48,0,2 104,50,2"/>
element	<红绿灯 name="s" bounds="0,0,60,200" origin="30,100"> <circle name="Circle1" bounds="0,0,60,60" origin="30,35" backcolor="$FF" pattern="1"/> <circle name="Circle2" bounds="0,70,60,130" origin="30,105" pattern="1"/> <circle name="Circle3" bounds="0,140,60,200" origin="30,175" pattern="1"/> </红绿灯>

单击菜单“Programe/Command line”。在调试窗口中输入以下代码：

d=AddUnit( 0, "circle" );d.loadfrombuffer(rect1.text)回车(rect1是上图右上角的文字单元)。这时在页面上便根据rect1中的字符串生成一个圆：

如果添加以下代码：

d=AddUnit( 0, "line" );d.loadfrombuffer(rect2.text)回车(rect2是上图右中的文字单元)。这时在页面上便根据rect2中的字符串，生成一个图形：

如果添加以下代码：

d = AddUnit( 0, "element" ); d.LoadFromBuffer( rect3.text )回车(rect3是上图右中的文字单元)。这时在页面上便根据rect3中的字符串，生成一个图形：

根据这个例子，我们可以将字符串存储于数据库中，当我们调用这些字符串时，便可以生成相应的图形。