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¡¢´úÂëûÓÐÎÊÌ⣬ֻÊDz»Òª·ÅÔÚFormµÄOnCreateʼþÖУ¬±ÈÈçÒÆ¶¯µ¥¶ÀµÄÒ»¸öButton.OnClickÖÐ
2¡¢printer.Canvas.Draw(0,0,bmpFucllScreen);
ÕâÒ»¾äÖÐÓÐÒ»¸ö±ÊÎó£¬bmpFucllScreenӦΪbmpFullScreen
»¹ÊÇÃ
Ïà¹ØÎÊ´ð£º
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......
ÎÒÊÇÐÂÊÖÏ£Íû´ó¼ÒôÅç¡£¡£
¾ÍÊÇÏëÎÊһϠ¹ØÓÚIDEµÄÎÊÌâ··
ÕÒÁ˺þ㬾ÍÊÇûÕÒÈ«¡£
Ï£Íû´ó¸çÃÇÌṩһϹþ¡£¡£¡£¡£
лл··
ÄãÏëÎÊIDEµÄʲôÎÊÌâ
¿ÉÒÔ¾ßÌ嵽ʲôÎÊÌâÂï
ÏÖÔÚµÄͬѧÌáÎ ......
ÎÒÔÚÏîÄ¿ÀïÊÇÔÚÕÒ²»µ½ÐÄÌø°üдʲôµØ·½ÁËÄÇλ´ó¸çÄܰïÎÒÔ¶³ÌÐÖúÕÒһϰ¡Ð»Ð»°¡
ÎÒqq398222333
Àϰ岻ÈÃ
ËÑË÷Ò»ÏÂɶ
Õâ¸öÏîÄ¿µÄ´úÂë²»ÊÇÄãдµÄ£¿
ËÑË÷²»µ½Âð
¾ÍÊÇд¹ýÁË£¬²»ÖªµÀ¶ªÔÚÄÄÁË£¬Â¥Ö÷´úÂëÐ ......