--EXCITEBOUNDARY_000__65fc16fe6265d77611b98fc0b0122fc8
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit

 Szervusztok

> Ha siman kikuldom a:
> Writeln(lst,'Kiirando szoveg');
> utasitast akkor nem fer el.

A kerdes nem annyira Pascal, hanem nyomtato. Feltetelezem, hogy matrix nyomtato
. Tobbnyire a kikuldott szoveg formazasat Epson vagy IBM kodokkal is lehet vege
zni. Ez tobbnyire allithato. Ha jol ertettem, Te arra gondoltal, hogy suritett 
modban nyomtass. A suritett modot Epson kodokkal az SI (#15) karakter kapcsolja
 be es a DC2 (#18) pedig ki. Tehat az egyszeru javaslat :
writeln(lst,chr(15),'Kiirando szoveg',chr(18));

Bovebben az Epson kodokrol :
http://www.google.com/search?q=epson+printer+codes

Feherke.


---
Join Excite! - http://www.excite.com
The most personalized portal on the Web!

--EXCITEBOUNDARY_000__65fc16fe6265d77611b98fc0b0122fc8
Content-Type: text/html; charset="us-ascii"
Content-Transfer-Encoding: 7bit

 Szervusztok<br />
<br />
> Ha siman kikuldom a:<br />
> Writeln(lst,'Kiirando szoveg');<br />
> utasitast akkor nem fer el.<br />
<br />
A kerdes nem annyira Pascal, hanem nyomtato. Feltetelezem, hogy matrix nyomtato
. Tobbnyire a kikuldott szoveg formazasat Epson vagy IBM kodokkal is lehet vege
zni. Ez tobbnyire allithato. Ha jol ertettem, Te arra gondoltal, hogy suritett 
modban nyomtass. A suritett modot Epson kodokkal az SI (#15) karakter kapcsolja
 be es a DC2 (#18) pedig ki. Tehat az egyszeru javaslat :<br />
writeln(lst,chr(15),'Kiirando szoveg',chr(18));<br />
<br />
Bovebben az Epson kodokrol :<br />
http://www.google.com/search?q=epson+printer+codes<;br />
<br />
Feherke.<br />
<p><hr><font size=2 face=geneva><b>Join Excite! - <a href=http://www.excite.com
 target=_blank>http://www.excite.com<;/a></b><br>The most personalized portal on
 the Web!</font>

--EXCITEBOUNDARY_000__65fc16fe6265d77611b98fc0b0122fc8--

Nez utanna a Windows Scripting - nek, sok mindent tud, de azert nem
mindent ...

Doma

> Lattam mar nehany ilyen szamlat es azokon valahogy a 
betumeret le let
> kicsinyitve. Megoldhato-e ez Pascalban (es hogyan)?

Ez nem programnyelvtol fugg, hanem a nyomtatotol. Epson 
nyomtatoknal pl. 0fh karakterkod kikuldesevel kapcsolhatod 
be a suritett modot, 12h koddal pedig ki.

Pascal pelda:
Writeln(lst,'normal szoveg ',chr(15),'suritett',chr(18),' 
megint normal');

Pityu

Sziasztok!

> Pascalban irok egy egyszeru szamlazo programot. Ott tartok hogy nyomtatni
> kellene es meghoza 9,5cm szeles papira.
> Ha siman kikuldom a:
> Writeln(lst,'Kiirando szoveg');
> utasitast akkor nem fer el.
> Lattam mar nehany ilyen szamlat es azokon valahogy a betumeret le let
> kicsinyitve. Megoldhato-e ez Pascalban (es hogyan)?
ESC szekvenciat kuldesz ki a nyomtatora. 
A nyomtato kezikonyveben ezek a vezerlo kodok benne
vannak. Hanem ott van a Tech help. Az alap funkciok
mindenik nyomtatonal altalaban megegyeznek. De biztosabb,
ha a nyomtato kezikonyvet megnezed.

ASCII     Decimal        Description
SI	       15                 Select Condensed Printing
DC2       18                Cancel Condensed Printing


Write( #15 ); {Select Condensed Printing}

..... Itt nyomtatod a szamlat (Write, WriteLn)

Write( #18 ); {Cancel Condensed Printing}

Udv. Arpi

Hi,

Ha nem akarsz a data ponterrel vacakolni es nem hasznalod az imageindexet,
abba is beleteheted a rekord id-t (marmint az imageindex-be mert az
egy integer).

Udv
   Rada

>Pascalban irok egy egyszeru szamlazo programot. Ott >tartok hogy nyomtatni
>kellene es meghoza 9,5cm szeles papira.
>Ha siman kikuldom a:
>Writeln(lst,'Kiirando szoveg');
>utasitast akkor nem fer el.

Hello, ha siman a writeln(lst,'szoveg'); utasitast 
hasznalod akkor altalaban 64 karakter fer el egy soron 
(A4-es lap). Ahoz, hogy a karaktermeretet valtoztasd ahoz
az un. Escape kodokat kell hasznalnod, es ez minden 
nyomtatonal mas es mas, ezekkel el tudod erni a nyomtatod 
minden beallitasat. Peldaul egy Epson kompatibilis 
tipusnal a: write(lst,#27#45#1); beallitja az "underlined" 
modot, a write(lst,#27#45#0); pedig az ellentete, a 
write(lst,#15); pedig a "condensed printing" modot allitja 
be ami gondolom a te esetedben segitene.
Az escape kodokrol sok leirast talasz a neten foleg a regebbi nyomtatokhoz amik
or meg mellekeltek a programozasi kezikonyvet is.
Remelem ez segitett, udv: Attila

(webes bekuldes, a bekuldo gepe: 68.144.213.21)