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