ZReport ve Lazer yazıcılar

[aslangeri]

s.a.
bir müşterimizde nokta vuruşlu yazıcılar için hazırlanmış bir rapor vardı. Zreportu kullandık.
Ancak eleman Brother HL5250DN (sanırım lazer) yazıcı almış.
Zreport ile alınan çıktılarda Ş ve İ harfleri farklı şekilde çıkıyor.
ne ile alakalı olabilir acaba fikirlerinize ihtiyacım var arkadaşlar.

[sabanakman]

İyi günler. Nokta vuruşlu yazıcılara çıktı veren komutları nokta vuruşlu veya lazer yazıcılarla çıktı alınırsa bu şekilde bir sorun çıkmaktadır. Bu araçla hiç uğraşmadım ama olayı grafik döküme çevirecek bir yapı kurmanız gerekmektedir. Mesela en basitinden .txt dosyasına çıktı alıp TQRStrinsBands kullanarak bu dosya yazdırılabilir diye umuyorum. İyi çalışmalar.

[mrmarman]

1- Öncelikle yazıcı driver'ında "Gelişmiş" sekmesinde "Yazdırma İşlemci" butonuna basınca açlan sayfadaki farklı seçenekleri deneyin. Burada "RAW" seçili olması lazım ama öyle ise de diğer seçenekleri seçip bir de öyle deneyin.

2- Yazıcıyı test için bir TEST projesi hazırlayın... Bu projede ZReport'un farklı ayarlarında çıktılar ve bir de alternatif olarak QuickReport çıktısı bulunsun. Türkçe harflerdeki tepkiyi farklı açılardan görmek için.

[aslangeri]

S.A.
@sabanakman
çıktıyı txt olarak kaydedince kaydettiğim dosyadada türkçe karakterler düzgün görünmedi.
@mrmarman
yazıcı seçeneklerini denedim. (yalnız RAW ın ne olduğunu anlamdım.) Bizim şirketteki lazer yazıcı ile denedim. gene aynı sıkıntı.
nokta vuruşlu yazıcıların karakter setleri ayarlanıyordu. burdada onun ile ilgili bir durum olabilirmi acaba diye düşünüyorum.

birde sadece ş ve i de değil Ğ ğ dede sıkıntı var.

[sabanakman]

İyi günler. O zaman çıkan string bilgiyi OemToAnsi ile windows karakterlerine çevirmek gerekiyor. Verdiğim ToWin fonksiyonu bu işlemi halledebilir.

Kod: Tümünü seç

function ToWin(str: String):String;
begin
  if str='' then begin
    Result:='';
    System.Exit;
  end;
  OemToAnsi(PChar(str),PChar(str));
  Result:=str;
end;

Sanırım bu fonksiyon düzgün çıkmayan Türkçe karakterleri düzeltecektir.

Memo1.Lines.Text:=ToWin(Memo1.Lines.Text);

Ayrıca diğer teknik sanki daha doğru gibi duruyor