请帮我解决一下，关于在图上显示字.... ( 积分: 200 )

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-06

• #1

我的思路描述：程序运行时，我想将一个五角星图，在其交点(有十个)上根据条件在交叉点上显示不同的字，一般只有3-4个，其它点就空着。显示完字后，将五星和字作为图保存到ole字段中，数据库用的是access.
或都是用delphi在程序中形成一个五星和字，再一同存入这个字段中，请以高手帮一下，分不够，可再加

 

H

hitman007260

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-07

• #2

根据条件 用textout 写字阿

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-07

• #3

不会用textout ,现在的问题是，怎样将图和图上的字一并存为文件，或放到数据表中

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-07

• #4

用textout直接把文字输出到timage控件上：
image1.Canvas.Brush.Style := bsClear;//不加此句，那么文字会有白色底色。
image1.Canvas.textout(5,5,'test');

然后看以后是否需要对文字进行编辑。
如果需要编辑的，那么图片，文字，以及文字字体，颜色，位置的描述信息保存为一个文件，格式自定。
如果不需要编辑，那么，用timage直接savetofile就好了，保存后是一个有文字在上面的图片。

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-08

• #5

谢谢ufo,还得再问一下，“如果需要编辑的，那么图片，文字，以及文字字体，颜色，位置的描述信息保存为一个文件，格式自定。”具体怎么做，我想选这一条，以后有可能要对文字进行编辑，就是说，我第一步已将文字和图做好，并形成了一个图形文件，如bmp ,那么在以后怎么才可以再修改文字或加文字？？？？？你回复以后，我就给分了

 

小

小雨哥

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-08

• #6

TFontRec = record
Text : string;
Color : TColor;
Size : integer;
PosX,PosY : integer;
Slope : integer;
end;

TMapRec = record
Image : TBitmap;
TextSet : array[0..9] of TFontRec;
end;

一个好的数据结构定义，可以在保存和读取时，完整收录全部信息。有了充分必要的信息，
就可以在任何地方、任何时候重现需要的信息。

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-09

• #7

首先，文字在添加到图上的同时，要把文字的信息记录下来，比如内容，字体，位置等。
记录格式，可以参考小雨哥的样子，用record来定义，也可以用纯文本格式，类似html的语法来记录。如果用纯文本格式的，那么可以把图片用base64编码后保存到文本。

定义record结构使用简单。纯文本模式通用性比较好。

 

暗

暗夜中独舞

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-09

• #8

貌似水印技术

 

D

dinglj1760

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-09

• #9

流化。
想做到图层化，那还得费点功夫。

 

Y

yhwyb

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-03-09

• #10

发分了，谢谢各位参与