用VB.Net 編程時如何獲得打印機(jī)的物理邊距

網(wǎng)絡(luò)上找到這個比較全面，汪手野你試一下，我記得以前也是這么設(shè)置的。

讓客戶滿意是我們工作的目標(biāo)，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務(wù)項目有：空間域名、雅安服務(wù)器托管、營銷軟件、網(wǎng)站建設(shè)、李滄網(wǎng)站維護(hù)、網(wǎng)站推廣。

int GetDeviceCaps( HDC hdc, int nIndex);

其中，hdc用來指定設(shè)備環(huán)境句柄，nIndex用來指定要獲取的參量索引，對于打印機(jī)而言，它常常需要下列的預(yù)定義值：

LOGPIXELSX 打印機(jī)水平分辨率

LOGPIXELSY 打印機(jī)垂直分辨率

PHYSICALWIDTH 打印紙的實(shí)際寬度

PHYSICALHEIGHT 打印紙的實(shí)際高度

PHYSICALOFFSETX 實(shí)際可打印區(qū)域的物理左邊距

PHYSICALOFFSETY 實(shí)際可打印區(qū)域的物理上邊距

下面的函數(shù)代碼就是用來設(shè)置頁邊距，并且還計算頁面的物理邊距：

void CEx_Prn1View::SetPageMargin(CDC *pDC, CPrintInfo *pInfo, int l, int t, int r, int b)

// l, t, r, b分別表示左上右困喊下邊距, 單位為0.1mm

{

int nOldMode = pDC- GetMapMode();

pDC- SetMapMode(MM_LOMETRIC);

// 計算一個設(shè)備單位等于多少0.1mm

double scaleX = 254.0 / (double)GetDeviceCaps(

pDC- m_hAttribDC, LOGPIXELSX);

double scaleY = 254.0 / (double)GetDeviceCaps(

pDC- m_hAttribDC, LOGPIXELSY);

int x = GetDeviceCaps(pDC- m_hAttribDC,

PHYSICALOFFSETX);

int y = GetDeviceCaps(pDC-薯陵 m_hAttribDC,

PHYSICALOFFSETY);

int w = GetDeviceCaps(pDC- m_hAttribDC,

PHYSICALWIDTH);

int h = GetDeviceCaps(pDC- m_hAttribDC,

PHYSICALHEIGHT);

int nPageWidth = (int)((double)w*scaleX + 0.5);

// 紙寬，單位0.1mm

int nPageHeight = (int)((double)h*scaleY + 0.5);

// 紙高，單位0.1mm

m_nPhyLeft = (int)((double)x*scaleX + 0.5);

// 物理左邊距，單位0.1mm

m_nPhyTop = (int)((double)y*scaleY + 0.5);

// 物理上邊距，單位0.1mm

pDC- DPtoLP(pInfo- m_rectDraw);

CRect rcTemp = pInfo- m_rectDraw;

rcTemp.NormalizeRect();

m_nPhyRight = nPageWidth - rcTemp.Width() -

m_nPhyLeft; // 物理右邊距，單位0.1mm

m_nPhyBottom = nPageHeight - rcTemp.Height() -

m_nPhyTop; // 物理下邊距，單位0.1mm

// 若邊距小于物理邊距，則調(diào)整它們

if (l m_nPhyLeft) l = m_nPhyLeft;

if (t m_nPhyTop) t = m_nPhyTop;

if (r m_nPhyRight) r = m_nPhyRight;

if (b m_nPhyBottom) b = m_nPhyBottom;

// 計算并調(diào)整pInfo- m_rectDraw的大小

pInfo- m_rectDraw.left = l - m_nPhyLeft;

pInfo- m_rectDraw.top = - t + m_nPhyTop;

pInfo- m_rectDraw.right -= r - m_nPhyRight;

pInfo- m_rectDraw.bottom += b - m_nPhyBottom;

pDC- LPtoDP(pInfo- m_rectDraw);

pDC- SetMapMode(nOldMode);

// 恢復(fù)原來的映射模式

}

vb點(diǎn)虐 截屏 ，獲取活動窗口

'模塊中

Declare Function GetDC Lib "user32" (ByVal hwnd As Long) _

As Long

Public Declare Function ReleaseDC Lib "user32" (ByVal hwnd As Long, ByVal hdc As Long) As Long

Declare Function BitBlt Lib "gdi32" _

(ByVal hDestDC As Long, ByVal x As Long, _

ByVal y As Long, ByVal nWidth As Long, _

ByVal nHeight As Long, ByVal hSrcDC As Long, _

ByVal xSrc As Long, ByVal ySrc As Long, _

ByVal dwRop As Long) As Long

'form1中

Private Sub Command1_Click()

Dim hDCtmp As Long, picWidth As Double, picHeight As Double

Dim x As Double

Dim y As Double

x = Val(Text2.Text)

y = Val(Text3.Text)

picWidth = Val(Text3.Text)

picHeight = Val(Text4.Text)

hDCtmp = GetDC(0)

BitBlt Picture1.hdc, 0, 0, picWidth, picHeight, hDCtmp, x, y, vbSrcCopy

ReleaseDC 0, hDCtmp

End Sub

目的: 將屏幕按照指定坐標(biāo)和大小進(jìn)行截取成圖,在picture1顯示

問題: 大小是相同了,為什么截取的坐標(biāo)不對,只是屏幕上的左上

相信大家都用過QQ截圖功能。不過很多人并沒有真正掌握好它的用法。將QQ截圖與其它截屏和制圖軟件配合使用，會有意想不到的效果。

獲取顏色的RGB值

我們在編輯圖片或網(wǎng)頁的時候，經(jīng)常需要獲取某種顏色的“RGB值”，所以很多人都安裝了第三方的顏色吸取工具。其時用QQ截圖鍵即可獲取屏幕上任意顏色的RGB值。

當(dāng)按下“Ctrl+Shift+A”彈出“截圖”提示框時，提示框中的“當(dāng)前像素RGB”即為當(dāng)前鼠標(biāo)含老屏幕位置的顏色RGB值，將鼠標(biāo)移動到你想查看的屏幕顏色上即可獲得相應(yīng)的RGB值（如圖1）。

圖1精確截取圖片大小

有時我們對要使用的截圖尺寸有嚴(yán)格要求，比如論壇簽名或QQ頭像等。用QQ截圖鍵可以按尺寸精確截取，一步到位無需再進(jìn)行后期裁剪了。

按下QQ截圖鍵，按住鼠標(biāo)不放選取截取范圍時，在鼠標(biāo)上方會有一個信息框顯示當(dāng)前范圍的詳細(xì)信息，其中“矩形大小”就是以像素來表示迅寬的圖片的尺寸大小，括號內(nèi)的數(shù)字分別表示的是長和高（如圖2）。松開鼠標(biāo)調(diào)畝老亮整截圖框時，對照“矩形大小”就可以按需要的尺寸來精確截圖范圍，然后用鼠標(biāo)點(diǎn)住截圖框?qū)⒔貓D框拖到要截取的圖片上，雙擊即可獲得所需尺寸的圖片了。

圖2圖片拼貼好幫手

大部分的截圖軟件一次只能截取一張圖片，當(dāng)要截取多張圖片并進(jìn)行拼貼組合時，就需要一張一張截取全部保存后再進(jìn)行拼貼操作，非常麻煩。

我們知道用QQ截圖鍵截取的圖片可以在任一個可以粘貼圖片的程序中使用，這樣只需用截圖軟件進(jìn)行一次截圖操作，剩下的圖片用QQ截圖鍵來截取，然后依次粘貼到截圖軟件的窗口中即可快速進(jìn)行拼貼操作了，是不是很方便啊。

小提示：QQ截圖鍵無需打開聊天窗口即可使用，截取的圖片在任一可粘貼圖片的程序窗口中如畫圖、Word等，使用“粘貼”命令即可使用

vb點(diǎn)虐 2008 如何將指定的窗體截圖并保存

INTOUCH自帶的就有，打印鋒瞎屏幕的命令

自己寫個時間條件運(yùn)行那命令就可以了

PRINTSCREEN這個命令 具體怎么用 看下幫助

希望我的回答對你有所幫助

如有仿蠢其他問題，可以繼續(xù)追問，您的采納是我前進(jìn)的動力銀大空！

網(wǎng)站名稱：vb點(diǎn)虐 獲取hdc vbnet getobject
轉(zhuǎn)載注明：http://www.chinadenli.net/article6/ddpspig.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供虛擬主機(jī)、移動網(wǎng)站建設(shè)、手機(jī)網(wǎng)站建設(shè)、品牌網(wǎng)站設(shè)計、網(wǎng)站排名、品牌網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)