Firdaus Archive

Gunakan fungsi page break di fast-report atau gunakan Character khusus untuk mengirim command ke printer seperti #12 untuk page break

Code Snippet :  CommandString = 'Hello, this is a test page!' + #10#12;

Specifically, the #12 character constant is the control character for a Form Feed, which is the command that an Epson dot-matrix printer like the LX-310 understands as a page break. The #10 character is a Line Feed, which moves the print head to the next line.

Contoh Untuk Delphi memakai di bawah ini untuk Cetak Draft

procedure PrintMe(Content: TStringList);

var

sPrinter, sDriver, sPort, sTitle: array[0..255] of Char;

hPrinter, hDevMode: THandle;

DocInfo1: TDocInfo1;

W: DWORD;

S: String;

C: Char;

I: Integer;

begin

// page-break

C := #12;

// initialize the document structure

with DocInfo1 do begin

pDocName := StrPCopy(sTitle, 'Your Title Here');

pOutputFile := nil;

pDatatype := 'RAW';

end;

// get the current printer (sPrinter)

Printer.GetPrinter(sPrinter, sDriver, sPort, hDevMode);

// open the printer

OpenPrinter(sPrinter, hPrinter, nil);

try

try

// start document to spooler

StartDocPrinter(hPrinter, 1, @DocInfo1);

StartPagePrinter(hPrinter);

// send the 'Source' to the printer

for I := 0 to Source.Count - 1 do begin

S := Source.Strings;

if not WritePrinter(hPrinter, PChar(S), Length(S), W) then

Break;

end;

// send a page-break to the printer (optional)

if not WritePrinter(hPrinter, @C, 1, W) then

Break;

// end the page

EndPagePrinter(hPrinter);

// end the document

EndDocPrinter(hPrinter);

finally

// close the printer

ClosePrinter(hPrinter);

end;

except

// abort the job

AbortPrinter(hPrinter);

raise;

end;

end;

https://www.tek-tips.com/threads/printing-text-on-dotmatrix-printer.921897/

 Pilih opsi Start printing after last page is spooler. lalu save, seharusnya cetakan akan sesuai urutan

Berlaku untuk LX-300, LX-310, LQ-310, LQ-2180, LQ-2190 dan kawan kawannya

Kode error 0x0000011b muncul saat ingin melakukan sharing printer pada windows 10. Error tersebut disebabkan oleh update terbaru windows 10 2021-09 Cumulative Update for Windows 10 Version 21H1 for x64-based Systems (KB5005565).

Cara mengatasi problem tersebut yaitu :

Buka Windows Registry Editor (regedit)

Kemudian arahkan ke HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Print

Kemudian buat DWORD-32 baru dengan nama RpcAuthnLevelPrivacyEnabled set Value Data : 0

Selanjutnya Restart PC / Laptop

Error 0x0000011b akan hilang dan sharing printer bisa digunakan kembali.

source : https://pdsi.unisayogya.ac.id/fix-error-kode-error-0x0000011b-windows-10-sharing-printer/

Ukuran Kertas Custom Printer Epson Dot Matrix/Laser Jet

Tutorial ini menggunakan Windows 7 akan tetapi bisa di gunakan untuk Windows 8, Windows 9 ataupun Windows 10.

Saya menggunakan printer EPSON LQ-2190 pada OS Windows 7, dan perlu penggunakan kertas ukuran Custom seperti 1/2 letter dan 1/4 Letter untuk form-form tertentu di perusahaan tempat saya bekerja sekarang ini. Akan tetapi setelah restart komputer ukuran kertas custom tersebut selalu hilang dan saya harus menambahkan manual ukuran kertasnya setiap kali komputer dinyalakan, ada 2 solusi yang saya gunakan

Solusi pertama :

Hidupkan Komputer terlebih dulu sebelum Printer (printer harus tersambung ke komputer meskipun printer dalam keadaan mati). Saya sudah mencoba cara ini dan sering berhasil

Solusi Kedua

Restart Print Spooler melalui Run > services.msc 

Cari print spooler > klik kanan lalu restart 

Restart print spooler

Cara ini bisa dibilang memakan waktu jika user harus melakukan ini setiap waktu saat printer tidak bisa digunakan, maka bisa menggunakan bantuan file batch dari windows

silahkan copy kode dibawah ini lalu taruh di notepad, simpan dengan print_spooler.bat (.txt ganti ,bat saat menyimpan)

:: Firdaus

:: November5th 2016

:: Tutorial: https://ifirdausku.blogspot.com/

@echo off

powershell -windowstyle hidden -command "Start-Process cmd -ArgumentList '/s,/c,net stop spooler & DEL /F /S /Q %systemroot%\System32\spool\PRINTERS\* & net start spooler' -Verb runAs"

Simpan dengan ekstensi .bat

 Jika sudah maka jalankan scriptnya, script ini perlu menggunakan administrator, maka dari itu tekan

Konfirmasi administrator user

Tekan yes maka scipt akan berjalan.

Jika sudah ada tulisan The print Spooler services was started successfully maka script sudah berhasil berjalan.dan silahkan cek lagi ukuran kertas maka sudah muncul seperti dibawah ini

Ukuran Kertas Custom Printer Epson Dot Matrix/Laser Jet

Jika anda perlu waktu tunggu sebelum print spooler di start anda bisa menambahnannya di script seperti dibawah ini, timout 5 adalah waktu tunggu selama 5 detik