CreateDC

此頁沒有內(nèi)容條目
內(nèi)容

CreateDC, CreateDCBynum

VB聲明

Declare Function CreateDC& Lib "gdi32" Alias "CreateDCA" (ByVal lpDriverName As String, ByVal lpDeviceName As String, ByVal lpOutput As String, lpInitData As DEVMODE)

Declare Function CreateDCBynum& Lib "gdi32" Alias "CreateDCA" (ByVal lpDriverName As String, ByVal lpDeviceName As String, ByVal lpOutput As String, lpInitData As Long)

說明

為專門設(shè)備創(chuàng)建設(shè)備場(chǎng)景

返回值

Long,新設(shè)備場(chǎng)景句柄,若出錯(cuò)則為零

參數(shù)表

參數(shù)

類型及說明

lpDriverName

String,用vbNullString傳遞null值給該參數(shù),除非:1、用DISPLAY,是獲取整個(gè)屏幕的設(shè)備場(chǎng)景;2、用WINSPOOL,則是訪問打印驅(qū)動(dòng)

lpDeviceName

String,所用專門設(shè)備的名稱。該名由打印管理器分配顯示

lpOutput

String,用vbNullString傳遞null值給該參數(shù)

lpInitData

DEVMODE,這個(gè)結(jié)構(gòu)保存初始值。用CreateDCBynum傳遞0(NULL)值則適用默認(rèn)設(shè)置

注解

在繪制之前,先要為該設(shè)備場(chǎng)景選定一個(gè)位圖。不再需要時(shí),該設(shè)備場(chǎng)景可用DeleteDC函數(shù)刪除。刪除前,其所有對(duì)象應(yīng)回復(fù)初始狀態(tài)。若有設(shè)備初始設(shè)置可用DocumentProperties API函數(shù)載入DEVMODE結(jié)構(gòu)。使用屏幕設(shè)備場(chǎng)景(DISPLAY)時(shí)要小心,因?yàn)樗鼤?huì)干擾其他應(yīng)用程序的外觀

示例:靠近屏幕左上角畫一個(gè)矩形

dc& = CreateDCBynum("DISPLAY", vbNullString, vbNullString, 0)

dl& = Rectangle(dc&, 5, 5, 100, 100)

Top