老大，再帮帮忙吧(50分)

S

sdenf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-27

• #1

怎么样才可以把Memo的文本转化为BMP，并且行和列都不变，
也就是把Memo文本变成同样大小的BMP，谁来帮帮我啊，给发个源程序细谢谢了sdenf@163.net

 

A

amakusa

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-27

• #2

根据Memo font属性 输入text到 bmp

 

Y

YoungSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-27

• #3

memo控件放在窗体右边。
procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
for i := 0 to memo1.Lines.Count -1 do
Canvas.TextOut(0,
i*(canvas.TextHeight('a')),
memo1.Lines);
end;

 

S

sdenf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-27

• #4

YoungSun老大：
你能不能解释一下 Canvas.TextOut(0, i*(canvas.TextHeight('a')), memo1.Lines);
‘A’是什么意思呢，谢谢你们了！！！！！！1

 

Y

YoungSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-06-27

• #5

'a'是随便放的一个字符，以得到输出时每一行的高度。