delphi 打印问题 - Delphi / VCL组件开发及应用
现在需要打印delphi窗体上所有的东西，我先抓图再打印，可是打印不出来，请大侠们帮忙。
只是我的代码：
procedure TForm1.FormCreate(Sender: TObject);
var
cvsFullScreenCanvas:TCanvas;
dc:HDC;
bmpFullScreen:TBitmap;
rectScreen:Trect;
begin
bmpFullScreen:=TBitmap.Create;
bmpFullScreen.Width:=screen.Width;
bmpFullScreen.Height:=screen.Height;
//设置BitMap对象
DC:=GetDC(0);
cvsFullScreenCanvas:=TCanvas.Create;
cvsFullScreenCanvas.Handle:=DC;
//设置Canvass对象
bmpFullScreen.Canvas.CopyRect(Rect(0,0,Screen.Width,Screen.Height),cvsFullScreenCanvas,Rect(0,0,Screen.Width,Screen.Height));
cvsFullScreenCanvas.Free;
ReleaseDC(0,DC);
if printdialog1.Execute then
begin
printer.BeginDoc;
printer.Canvas.Draw(0,0,bmpFucllScreen);
printer.EndDoc;
end;
bmpFullScreen.Free;
delphi有自带的打印demo,你可以看一下
直接Self.Print
1、代码没有问题，只是不要放在Form的OnCreate事件中，比如移动单独的一个Button.OnClick中
2、printer.Canvas.Draw(0,0,bmpFucllScreen);
这一句中有一个笔误，bmpFucllScreen应为bmpFullScreen
还是�
相关问答：
以前中间站是电脑通过串口控制的，现在改成了USB接口，请问要怎么做啊？求高手指点一下
是usb转串口吗？那应该还是可以按串口操作的，只是速度不能太高
如果不是usb转串口，请查阅usb驱动的sdk说明。
这个是� ......
现有paradox数据库使用BDE驱动，拟改为C/S版，增加网络读取数据功能。请哪位大侠，提供源码。
说句不客气的话，用paradox做C/S是自寻死路。
换一个网络数据库
因为不想动大手术，仅能共享几个文件即可。
Da ......
DELPHI如何向 CMD里发送命令。不是调用别的程序，而是在里面写一些带参数的命令，如：ipconfig/all
自己顶一下
Shellexecute ,后面有个带参数的
createprocess 也可以带参数
WinExec(PChar( 'cmd /k dir ......
RXmlDoc := System.xml.XmlDocument.Create;
sxml := copy(sRsult, ir + 8, length(sRsult));
sxml := System.Text.Encoding.GetEncoding('gb2312').GetString(Convert.fromB ......
