Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: Scanner işlemleri  (Okunma sayısı 257 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı sheshman

  • Delphi 2007 Level 1
  • *
  • İleti: 501
  • Rep: +10/-0
  • Cinsiyet: Bay
  • So others may live...
    • http://www.sheshman.com
Scanner işlemleri
« : 25 Ocak 2012 10:21:22 »
Arkadaşlar Selam,

Kodak Twain Source ile delphi içerisinden tarama yapabiliyorum, yine JPEG kütüphanesinin compress özelliği ile 3mb lık JPG resimlerini 108Kb'a kadar çekebiliyorum buraya kadar sorun yok. Ancak Kodak Twain Source anladığım kadarıyla oldukça eski bir kontrol, mesela PDF dosyası olarak kayıt yapamıyorum internette araştırdım tamamen resim üzerine işlem yaptığı gibi bilgiler var, kullandığınız bir scanner componenti varmı ? Neler tavsiye edersiniz. ? Örneğin Kodak Twain'in yapamadığı birşey daha tarama çözünürlüğünü değiştirememesi, tarama tuşuna bastığınızda tarayıcının kendi yazılımı devreye giriyor ve ayarları oradan yapmak zorunda kalıyorsunuz eğer resim dışında bir format seçerseniz de Access violation hatası alıyorsunuz vs.

Kodak Twain dışında tavsiye edebileceğiniz scanner componenti varmı ?

bu arada tarama için aşağıdaki kodu kullanıyorum kod ile tarama çözünürlüğü belirtilse dahi scanner kendi arabirimine göre tarıyor.

Kod:  (Unknown Language)
  1.   if ImgScan1.ScannerAvailable then
  2.   try
  3.     ImgScan1.OpenScanner;
  4.     imgscan1.FileType:=6;
  5.     ImgScan1.ScanTo := 2;
  6.     imgscan1.Zoom:=50;
  7.     ImgScan1.Image:='C:\resim.jpg';
  8.     ImgScan1.StartScan ;
  9.     Application.ProcessMessages;
  10.   finally
  11.     ImgScan1.CloseScanner ;
  12.     Image1.Picture.LoadFromFile('C:\resim.jpg');
  13.   end;
  14.  
« Son Düzenleme: 25 Ocak 2012 10:31:34 by sheshman »
Dünya sizden nefret ederse sizden önce benden nefret etmiş olduğunu bilin. Dünyadan olsaydınız dünya kendisine ait olanı severdi.
http://www.sheshman.com

Çevrimdışı cakirr42

  • Administrator
  • *****
  • İleti: 1.069
  • Rep: +5/-0
  • Cinsiyet: Bay
  • Ben Bana Kendim İçin Lazımım...
    • Ahmet Kürşat ÇAKIR
  • Delphi Sürümü: XE, XE2
Ynt: Scanner işlemleri
« Yanıtla #1 : 25 Ocak 2012 12:42:06 »
kodak iflas etti hacı :)
http://akcakir.net/
Dalından Kopan Yaprağın Akıbetini Rüzgar Tayin Eder
"Alparslan TÜRKEŞ"

Çevrimdışı barutali

  • Administrator
  • *****
  • İleti: 2.228
  • Rep: +54/-0
  • Cinsiyet: Bay
  • Falan filan ...
  • Delphi Sürümü: 2010 - XE2
Ynt: Scanner işlemleri
« Yanıtla #2 : 25 Ocak 2012 12:59:49 »
ENimage yada ImageEN diye bir bileşen var onu kullan aga..



Amatör Küme Programcı

Çevrimdışı sheshman

  • Delphi 2007 Level 1
  • *
  • İleti: 501
  • Rep: +10/-0
  • Cinsiyet: Bay
  • So others may live...
    • http://www.sheshman.com
Ynt: Scanner işlemleri
« Yanıtla #3 : 25 Ocak 2012 13:05:47 »
oki doki, yaz kızım oy birliği ile araştırılmasına indirilip denemesine sorun çıkarsa buraya yazılmasına....
Dünya sizden nefret ederse sizden önce benden nefret etmiş olduğunu bilin. Dünyadan olsaydınız dünya kendisine ait olanı severdi.
http://www.sheshman.com