[ salvaric @ 15.04.2014. 17:53 ] @
Pozdrav,

radim neku malu aplikaciju za štampanje viramana, pa me interesuje dal neko zna kako podesiti sa kodovima (u txt fajlu) štampač da posle odštampanog virmana izvuče papir na poziciju za sečenje, a posle prilikom nove štampe da vrati papir na početnu poziciju?

kod:
Code:

var
  Lista: TStringList;
  Zaglavlje: String;
begin
     Zaglavlje:=         #27'@' +     // Reset
                         #27#108#0;// +  // Leva margina =  0
                         #27#67#0#4; // Velicina stranice u incima ( 4 = 10.2 cm)

Lista:=TStringList.Create;
try
  Lista.Append(Zaglavlje);
  Lista.Append('Firma...');
  ....

  Lista.Append(#12);
  Lista.SaveToFile('d:\vir.txt') ;
finally
  Lista.free ;
CopyFile(pchar('d:\vir.txt'),pchar('LPT1:'),false);
end;


Unapred se zahvaljujem!
[ Rapaic Rajko @ 15.04.2014. 21:08 ] @
Treba da imas u manualu tog stampaca kodove za sve moguce operacije s papirom.

Pozz
[ salvaric @ 16.04.2014. 08:12 ] @
Tražio sam, eksperimentisao sa raznim kodovima al ćorak.
[ juha5803 @ 16.04.2014. 08:32 ] @
Podesi veličinu strane u štampaču na 4 inča i TEAR OFF opciju na ON i ništa drugo ti ne treba.
[ salvaric @ 16.04.2014. 09:11 ] @
Nesmem menjati dužinu stranice u štampaču, zato što štampam i normalan papir u njemu, a povremeno i neke virmane.
[ komplikator @ 16.04.2014. 09:53 ] @
Pa pošalji mu kodove za visinu stranice. Na kraju tiskanja inicializiraj printer i to je to. ESC sekvence su napravljene upravo za to. Potraži ESC/P2 manual za developere, imaš i primjere i ostalo.

Inače, zašto ne radiš s texet generic driverom nego ove kemije s direktnim ispisom na port?