Printer

Mesaj gönderen **husonet** » 28 Tem 2003 12:17

Arkadaşlar yazdığım programda nokta vuruşlu yazıcı kullanmayı düşünüyorum fakat nokta vuruşlu yazıcıya nasıl bilgi göndereceğimi bilmiyorum. Fatura Çıktısı için

Yardımcı olursanız sevinirim.

http://www.durmus.net

Mesaj gönderen **fahrettin** » 28 Tem 2003 01:17

Windows'a tanitilmis bir yazici ise digerlerinden hic bir fark olmaksizin kullanabilirsiniz. Ya da daha ozel baska bir sey mi sormak istediniz onu bilemiyorum.

Kolay gelsin...

Mesaj gönderen **husonet** » 28 Tem 2003 01:32

Benim istediğim olay Pascal fonksiyonları. Dos programlarının yazıcı çıktısını yakalamak istiyorum. Nokta vuruşlu yazıcıyı windows'a tanıtmadan bütün nokta vuruşlu yazıcılarda çalışmasını istiyorum.

Bu Arada Mantı Gününe gelemediğim için çok üzgünüm Çok ta gelmek istemiştim. Ankara'dan misafirlerim geldi. Kusura bakmazsınız umarım.

Mesaj gönderen **P206** » 28 Tem 2003 03:13

Merhaba,

Eski şirkette yaptığımız progralarda nokta vuruşlu printerler kullanıyorduk. Biz dostan (delphi içinden) lpt1 e yolluyorduk.
Faturayı text bir dosyaya yazdırıyorduk. oradan da
copy fatura.txt lpt1:
gibi bir komutla yolluyorduk.

Belki seninde işine yarar.

Mesaj gönderen **mussimsek** » 28 Tem 2003 03:48

Merhaba,

zreport kullanabilirsin.

http://www.torry.net adresinde ismiyle arat, bulursun.

Kolay gelsin.

Mesaj gönderen **husonet** » 28 Tem 2003 04:19

zReport ücretlimi aslında ben hazır bileşen kullanma taraftarı değilim son care olarak düşünülebilir. Ama farklı yöntemlerle denemek bence çok daha faydalı.

Teşekkür Ederim.

Mesaj gönderen **mussimsek** » 28 Tem 2003 05:08

hayır bedava.

Kolay gelsin.

Mesaj gönderen **m_ekici** » 30 Tem 2003 09:30

Kod: Tümünü seç

  AssignFile(PRN,'LPT1:');
  Rewrite(PRN);
  WriteLn(PRN,'  ');
  WriteLn(PRN,CEVIR(chr(27)+'w1'+chr(14)+Format('       %-4.4s',[FIS_YIL.Text])+chr(27)+'w0'+CHR(20)));
   WriteLn(PRN,CEVIR(chr(27)+'w1'+Format(' %-35.35s',[FIS_ADI.Text+' '+FIS_SOYADI.Text])+chr(27)+'w0'));
   WriteLn(PRN,'  ');

CloseFile(PRN);

Mesaj gönderen **husonet** » 30 Tem 2003 05:35

Burada kullanılan fonksiyonları da kısaca açıklarsanız çok sevinirim.

Fonksiyonların aldığı argumanlar nelerdir? Geri dönüş değerleri nelerdir?

Ayrıca yardımlarınız için Teşekkür Ederim.

Mesaj gönderen **m_ekici** » 31 Tem 2003 09:43

Kusura bakma fonksiyonu unuttum.
CEVIR (XX)
Delphiden LPT1'e direk türkçe karakterleri gönderdiğinde hatalı çıkıyor. Göndermeden önce XX içerisinde bulunan Tr karakterleri doğru karakterlerle değiştiriyor.

Mesaj gönderen **husonet** » 31 Tem 2003 11:48

Yoo problem deil biraz ascii kodlarıyla uğraşmak lazım galiba yine de Teşekkür Ederim.