paxregistry.blogg.se

' - Open a channel to the printer or spooler.Ĭall OpenPrinter(pPrinterNm, hPrinter, 0) ' that there will be a problem if we send it ' different enough from what the printer expects ' - Send a string of raw data to the printer.ĭim dataToSend = Marshal.StringToCoTaskMemAnsi(pOrigStr)ĭim dataSize As Integer = pOrigStr.Length() Public Shared Function fnPrintRaw(ByVal pPrinterNm As String, ByVal pOrigStr As String) As Boolean Public Shared Function WritePrinter(ByVal hPrinter As IntPtr, ByVal buffer As IntPtr, ByVal bufferLength As Integer, _īyRef bytesWritten As Integer) As Boolean Public Shared Function EndPagePrinter(ByVal hPrinter As IntPtr) As Boolean Public Shared Function StartPagePrinter(ByVal hPrinter As IntPtr) As Boolean Public Shared Function EndDocPrinter(ByVal hPrinter As IntPtr) As Boolean Public Shared Function StartDocPrinter(ByVal hPrinter As IntPtr, ByVal level As Integer, ByRef documentInfo As DOCINFO) As Boolean Public Shared Function ClosePrinter(ByVal hPrinter As IntPtr) As Boolean Public Shared Function OpenPrinter(ByVal printerName As String, ByRef hPrinter As IntPtr, ByVal printerDefaults As Integer) As Boolean ' - Define interfaces to the functions supplied ' - Define the data type that supplies basic

Private Const AwalBrs As String = ESC_CHAR & "$" & Chr(32) & Chr(1) Private Const gDRAFT_17 As String = ESC_CHAR & "P" & ESC_CHAR & "W" & Chr(0) & Chr(15) Private Const ESC_CHAR As String = Chr(27) Ya daripada saya banyak cakap lebih ini syntax yang q pakai akhirnya, y dengan sedikit modifikasi dari aslix…he… Pusing cari referensi tentang print text ke LX-300+II karena data penjualan yang dibuat sales berbentuk text dan harus dibuat rangkap 3 (tunai, kredit, backup), sudah tanya2 ke mbah google kagak nemu juga sampai akhirnya nemu juga di forum kaskus ada yang tanya sama dengan permasalahanq.