bitblt 的问题 ( 积分: 20 )

G

gudubinghe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-24

• #1

代码如下:
var bitmap:Tbitmap;
begin
bitmap.create;
bitmap.canvas.textout(10,10,'abc');
bitblt(form1.Canvas.Handle,0 ,0,form1.Width,form1.Height,
bitmap.Canvas.Handle,0,0,srccopy);
bitmap.free;
end;
执行后,在窗体上并没有abc三个字符,为什么?

 

G

gudubinghe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-24

• #2

代码如下:
var bitmap:Tbitmap;
begin
bitmap.create;
bitmap.canvas.textout(10,10,'abc');
bitblt(form1.Canvas.Handle,0 ,0,form1.Width,form1.Height,
bitmap.Canvas.Handle,0,0,srccopy);
bitmap.free;
end;
执行后,在窗体上并没有abc三个字符,为什么?

 

S

siaosa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-24

• #3

bitmap.width:=1024;
bitmap.height:=768;

 

G

gudubinghe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-24

• #4

谢谢了。给分了。

 

G

gudubinghe

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-24

• #5

to siaosa
再请教一个问题，

按照上面的方法绘出字后，如果继续用这个方法绘其他的字，那么怎么样擦掉原来绘上的字，避免重叠.