w2003如何利用mspaint打印各种类型的图片 ( 积分: 100 )

K

kukujaky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #1

1如果能给出mspaint的对象也是可以的(试过了,用createoleobject('PBrush')提示不支持的接口)
2用shellexecture()怎么写,也就是说mspaint支持的图片都用它打开,然后利用它的打印功能打印图片
shell(application.hanld, 'Print', 'mspaint', PChar(AInFile), nil, SW_Hide);不行.
shell(application.hanld, 'Open', 'mspaint', PChar(AInFile), nil, SW_Hide);就是可以打开
3如何编程实现打印excel的时候打印整个工作薄,而不只是当前工作表,用olevariant(ExcelApp).Sheets.Count已经可以循环打印,但是如何让它打印出来的是一个文件(里面有三页),而不是三个文件(假设它有三个工作表),因为等下要用打印保存的文件来发传真的.

 

K

kukujaky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #2

自己提前,在线等待,再不能解决老板就有意见了,大家帮帮忙.
其实是在做传真程序,利用虚拟打印机把打印的内容存成传真格式的文件.

 

K

kukujaky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #3

没有人来帮忙看一下吗,那个急啊...

 

K

kukujaky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-29

• #4

一个早上了,还是没人来看看,要不说说你们以前相关的处理经验也行啊.

 

9

968studio

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-30

• #5

1.2.打印图片找一下就有了
3.查看excel vba吧

 

K

kukujaky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-05-30

• #6

昨晚搞到一点半，终于搞定，问题解决了。

 

K

kukujaky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-06-28

• #7

接受答案了.