这问题问了很久了半年了都没人回答看来是大富翁里最难的问题大富翁里的大虾都哪里去了(200分)

H

hn

Unregistered / Unconfirmed
GUEST, unregistred user!
我在做一程序拿那printer.canvas来做打印的
但我做到printer.canvas.textwidth('大富翁')的时候呢会走纸的按照我的理解呢这不会
走纸的,printer.canvas.textwidth('大富翁')的代码的意思我理解为打印在纸上的宽度
但会走纸一张的怎么来解决掉
执行此代码时呢会产生打印的任务,
这代码不是打印的代码怎么会产生打印呢,textout的时候才会打印的,。。。。。
 
你连标点符号都不懒得打那有能力的大富翁当然不想回答你了主要还是没时间看你这不清不
楚的问题所以不能回答只有我这无聊的人才愿意看你问题并帮你提前
 
还有啊就是你的这个问题我看到三个不同帐号问过了不知道这三个帐号是不是全是你
的但是我又不会回答你的问题而且即使会的大侠估计也不喜欢这种行为所以呢你还是
自己看看该怎么办吧
 
可以把你的问题和代码都讲清楚再下结论,着急会做不好事情的。
 
等待好的回答
我执行这三行代码执行到第三行代码的时候呢会执行打印的任务的
printer.canvas.font.name:='宋体'
printer.canvas.font.size:=10
printer.canvas.textwidth('asfdas') 照道理这行不会执行打印的任务的,
等待好的答案了
 
各位大虾我对此问题真的很急的希望大家呢替我解决掉此问题的小弟在上海的通宵我都要解决掉
否则的话明天我会很麻烦的,
 
各位大虾有那打印机的可以操作看,
 
以前在delphi的老版本里能的现在的为delphi6
 
大虾可拿打印机呢试试看
 
把你的代码贴出来吧,printer.canvas.textwidth是不打印的,你是不是调用了
Printer.BenginDoc
 
printer.begdoc我没做过的,
这我懂的
大家可简单的试试我贴出来的三行代码看
 
等待好的答案了
 
你去试试 :
procedure TForm1.Button1Click(Sender: TObject);
begin
if PrintDialog1.Execute then
begin
with Printerdo
begin
begin
Doc;
canvas.font.name:='宋体';
canvas.font.size:=10;
canvas.textwidth('asfdas');
canvas.TextOut(......);
EndDoc;
end;
end;
end;

搞笑!

[red][h3]去试试,看看究竟打几张!!给我回复!!!!!!![/h3][/red]
 
<font color='red'><h3>我试过了,打印最后的textout,只打印一次了,问题解决了,
但这样的话,
每做一次textwidth就得做textout,还得套begdoc和enddoc太麻烦了怎么会这样呢</h3></font>
 
可我textwidth呢得试打印的内容在纸里所占的宽度我得派用场的
 
你是那个国家的,我怎么看不明白你写的东西?
敢问一声,你是日本人吗?
 
问题字体和大小呢用户可自已来设的
 
无人解答了
 

Similar threads

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