DYMO-Printer SDK Wrapper for PureBasic
Вы не можете выбрать более 25 тем Темы должны начинаться с буквы или цифры, могут содержать дефисы(-) и должны содержать не более 35 символов.

116 строки
3.7 KiB

EnableExplicit
; if you want to change some settings, create your own constants before include this file
CompilerIf Defined(DYMO_DLL_ImportFile_32bit, #PB_Constant) = #False
#DYMO_DLL_ImportFile_32bit = "DYMO32.lib"
CompilerEndIf
CompilerIf Defined(DYMO_DLL_ImportFile_64bit, #PB_Constant) = #False
#DYMO_DLL_ImportFile_64bit = "DYMO64.lib"
CompilerEndIf
CompilerIf Defined(INCLUDE_DYMO, #PB_Constant) ; if DYMO / DYMO_DLL is already included
CompilerError "<" + #PB_Compiler_Filename + "> DYMO already included !!"
CompilerElse
#INCLUDE_DYMO = #True
CompilerEndIf
CompilerSelect #PB_Compiler_Processor
CompilerCase #PB_Processor_x86
#INTERNAL_DYMO_Import_File = #DYMO_DLL_ImportFile_32bit
Import #INTERNAL_DYMO_Import_File
INTERNAL_DYMO_GetCurrentPrinterName() As "_DYMO_GetCurrentPrinterName@0"
INTERNAL_DYMO_NextPrinter() As "_DYMO_NextPrinter@0"
INTERNAL_DYMO_MRU_NextFile() As "_DYMO_MRU_NextFile@0"
INTERNAL_DYMO_NextObject() As "_DYMO_NextObject@0"
INTERNAL_DYMO_GetText(Object.s) As "_DYMO_GetText@4"
INTERNAL_DYMO_MRU_GetFileName(Index) As "_DYMO_MRU_GetFileName@4"
EndImport
CompilerCase #PB_Processor_x64
#INTERNAL_DYMO_Import_File = #DYMO_DLL_ImportFile_64bit
Import #INTERNAL_DYMO_Import_File
INTERNAL_DYMO_GetCurrentPrinterName() As "DYMO_GetCurrentPrinterName"
INTERNAL_DYMO_NextPrinter() As "DYMO_NextPrinter"
INTERNAL_DYMO_MRU_NextFile() As "DYMO_MRU_NextFile"
INTERNAL_DYMO_NextObject() As "DYMO_NextObject"
INTERNAL_DYMO_GetText(Object.s) As "DYMO_GetText"
INTERNAL_DYMO_MRU_GetFileName(Index) As "DYMO_MRU_GetFileName"
EndImport
CompilerEndSelect
Enumeration DYMO_Tray
#DYMO_Tray_Unknown = -1
#DYMO_Tray_Left = 0
#DYMO_Tray_Right = 1
#DYMO_Tray_Auto = 2
EndEnumeration
#DYMO_POSTNET_Pos_None = "NONE"
#DYMO_POSTNET_Pos_Top = "TOP"
#DYMO_POSTNET_Pos_Buttom = "BUTTOM"
Import #INTERNAL_DYMO_Import_File
DYMO_Init()
DYMO_Release()
DYMO_ExaminePrinters()
DYMO_SelectPrinter(PrinterName.s)
DYMO_IsTwinTurboPrinter(PrinterName.s)
DYMO_GetCurrentPaperTray()
DYMO_StartPrintJob()
DYMO_StopPrintJob()
DYMO_OpenLabel(File.s, ShowDialogBoxIfFail = #False)
DYMO_SaveLabel(File.s = #Null$)
DYMO_PrintLabel(Copies = 1, ShowDialog = #False, Tray = #DYMO_Tray_Unknown)
DYMO_IsPrinterOnline(PrinterName.s)
DYMO_OpenMemory(*Buffer, BufferSize)
DYMO_SaveMemory()
DYMO_OpenURL(URL.s)
DYMO_MRU_ExamineFiles()
DYMO_MRU_GetFileCount()
DYMO_MRU_OpenFile(Index)
DYMO_SetPrintMode(HighQuality = #True)
DYMO_SmartPasteFromClipboard()
DYMO_SmartPasteFromFile(File.s)
DYMO_SmartPasteFromString(Text.s)
DYMO_ProxySetup(Protocol.s, ServerName.s, Port.l, ProxyBypass.s, UserName.s, Password.s)
DYMO_ProxyClearSettings()
DYMO_ProxyBypass(Set = #True) ; #False = default
DYMO_ExamineObjects(VariableOnly = #True)
DYMO_SetAddress(Address.s, Index = 1)
DYMO_SetField(Object.s, Text.s)
DYMO_GetAddressFieldCount()
DYMO_SetAddressPOSTNET(POSTNET_Pos.s, Index = 1)
DYMO_SetImageFile(Object.s, File.s)
DYMO_SetImageURL(Object.s, URL.s)
DYMO_PasteFromClipboard(Object.s)
DYMO_PasteImageFromClipboard(Object.s)
EndImport
Macro DYMO_GetCurrentPrinterName()
PeekS(INTERNAL_DYMO_GetCurrentPrinterName())
EndMacro
Macro DYMO_NextPrinter()
PeekS(INTERNAL_DYMO_NextPrinter())
EndMacro
Macro DYMO_MRU_NextFile()
PeekS(INTERNAL_DYMO_MRU_NextFile())
EndMacro
Macro DYMO_NextObject()
PeekS(INTERNAL_DYMO_NextObject())
EndMacro
Macro DYMO_GetText(__Object_s__)
PeekS(INTERNAL_DYMO_GetText(__Object_s__))
EndMacro
Macro DYMO_MRU_GetFileName(__Index__)
PeekS(INTERNAL_DYMO_MRU_GetFileName(__Index__)
EndMacro
DisableExplicit
; CursorPosition = 1
; Folding = A5
; EnableXP
; CompileSourceDirectory
; EnableCompileCount = 0
; EnableBuildCount = 0
; EnableExeConstant

Impressum | Datenschutz