怎样用Delphi 7 把Delphi完整源代码做成软件?

怎样用Delphi 7 把Delphi完整源代码做成软件?,第1张

点击build就可以啦~~~但是要注意的是答梁如果你只有代码而不是.pas和.drm文件的话,你要先在自己的设计界面添加相应的控件~~~而升源且要把控件的name属性改过来才可以编译通过的。清笑运

form1.PrintScale:=poPrintToFit

form1.Print

是可以打印出来的啊,

你这样试下:

在USE里加入Clipbrd

procedure TForm1.Button1Click(Sender: TObject)

var

FormImage: TBitmap

MyImage:TImage

begin

FormImage := GetFormImage

MyImage:= TImage.Create(nil)

try

Clipboard.Assign(FormImage)

MyImage.Picture.Assign(Clipboard)

MyImage.Picture.SaveToFile('D:/xxx.bmp')

finally

begin

MyImage.Free

FormImage.Free

end

end

end

看看产生的xxx.bmp就知道了,如果xxx.bmp没问题建议看看是不是打印机的问题

窗体名直接 .Print只能打印能看见的部分,如果窗体有滚动条,直接看不见那部分是打不出来的


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/12349851.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-24
下一篇 2023-05-24

发表评论

登录后才能评论

评论列表(0条)

保存