Sayfa Tarayıcı Kontrolü...

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Sayfa Tarayıcı Kontrolü...

Mesaj gönderen sertkayasalih »

Merhaba,

Delphi'de yeni sayılırım. WinXP de Delphi 6 kullanıyorum.
Üzerinde çalıştığım projede:
Sistemde sayfa tarayıcı 'Scanner' var mı? yok mu? kontrolü yapmak istiyorum.
Böyle birşey mümkün mü? Nasıl bir kod yazarak yapabilirim :?:

Scanner olarak belirtmeyi unutmuşum, düzeltiyorum.
Yardımcı olan herkese şimdiden teşekkürler :)

Saygı ve sevgiyle kolay gelsin.
En son sertkayasalih tarafından 18 Şub 2004 11:36 tarihinde düzenlendi, toplamda 1 kere düzenlendi.
Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

sorunuzu biraz daha detalı acık secik ifade edebilirmisiniz
sayfa tarayıcı ne demek
scannerdan mi bahsediyorsunuz...
yoksa bir text dosyayının bir sayfasımı
yoksa rapor sayfasımı
ÜŞENME,ERTELEME,VAZGEÇME
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Mesaj gönderen sertkayasalih »

Merhaba,

Sn. gkimirti Sayfa tarayıcısı derken, Scanner olarak belitmeyi unutmuşum :oops: özür dilerim.
İlginiz için teşekkürler.

Saygı ve sevgiyle kolay gelsin.
En son sertkayasalih tarafından 19 Şub 2004 12:54 tarihinde düzenlendi, toplamda 1 kere düzenlendi.
Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

http://delphi.about.com/library/weekly/aa030299.htm
makalede ocx olan twain kaynagını ekleyerek yapmıs ama senin istedigin muhtemelen bu degil
iki tane freware scanner kontrol komponenti var incelemedim
ama bir bakarsan faydalı olabilir
kolay gelsin
ÜŞENME,ERTELEME,VAZGEÇME
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Mesaj gönderen sertkayasalih »

Merhaba gkimirti;

Verdiğiniz bilgiler için teşekkür ederim.

Burdaki bulunan programlar bayağı komplike...
ImageLib ve ImageEn'i daha önce inceleme fırsatı bulmuştum. Diğerlerine bakacağım. İnşallah ilgili kodu bulabilirim.
O halde Windows programının standart Scanner bağlı mı? değil mi? Extra bir program olmadan, Delphi'de kontrol edebileceğimiz (handle) kod yok.
Diğer programları inceledikten sonra neticeyi bildiririm.
Tekrar teşekkürler...

Saygı ve sevgiyle kolay gelsin.
Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

tam olarak yok deyip kestirip atamayız bence
cunku o comp. de bir ve birkac api grubunu (muhtemelen twain ile alakalı dll ler) kullanarak bu isi yapıyor
arastırarak yabancı forumlara bakarak (ben bakmadım ama bu konuda google groups bir hazine ve linkler kısmında borland news lerinde arama yapan bir site de var http://www.tamaracka.com/) hangi dll lerde hangi fonk.ların kullanıldıgı bulunabilir
ÜŞENME,ERTELEME,VAZGEÇME
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

@midijor selam... :)


- @gkimirti çok doğru bir yaklaşımda bulunmuş, tebrik ederim... Hemen yok deyip kestirip atmak bir Delphi programcısına yakışmaz... :oops:

- Ben projelerimde tarayıcı kullanmak için hep ActiveX eklentilerini kullanırım... Twain uyumlu tüm tarayıcılarla problemsiz çalışıyor... :lol:

- Yapmanız gereken ilk şey, Delphi IDE'nin Project menüsündeki Import Type Library menü elemanı yardımıyla açılan pencereden (bendeki Windows Türkçe, İngilizce Windows'unuz varsa benzer ismin İngilizcesini de bulursunuz...) Kodak Resim Tarama Denetimi olanını seçin. Install deyip onay verin... 8)

- Artık bileşen paletinizdeki ActiveX kısmında TImgScan isimli bir bileşenin eklendiğini göreceksiniz... :roll:

- işte bu bileşeni formunuza ekleyin... ImgScan1 gibi bir isim alacaktır... :idea:

- Artık aşağıdaki kod ile sistemde tarayıcı olup olmadığını sorgulayabilir ve hatta tarayıcıyı kullanıp taranan resmi programınıza alabilirsiniz... :idea:

Kod: Tümünü seç

    If Imgscan1.ScannerAvailable then ... //tarayıcı varsa true döner...
Resim
Resim ....Resim
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Mesaj gönderen sertkayasalih »

Merhaba mrmcop;

İlginiz için çok teşekkür ederim.
Delphi 6 kullanıyorum, işletim sistemim WinXP Pro. Türkçe.
Delphi IDE'nin Project menüsündeki Import Type Library menü elemanı yardımıyla açılan pencereden:
Belirttiğiniz gibi 'Kodak Resim Tarama Denetimi' veya benzer ingilizcesini defalarca aramama rağmen bulamadım :roll:

Acaba WinXP Pro'da olmayabilir mi?

Saygı ve sevgiyle kolay gelsin.
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Selam...

- Doğru, XP'de bu destek konmamış ama sizin bunu koyma şansınız var...

- http://techrepublic.com.com/5100-6270-5034679.html linkindeki Batch file to add Kodak Imaging for Windows to Windows XP başlıklı sayfaya bir göz atın, bulacaksınız...
Resim
Resim ....Resim
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Mesaj gönderen sertkayasalih »

Merhaba mrmcop;

Öncelikle zaman ayırıp ilgilendiğiniz için çok teşekkür ederim. Sizlere zahmet veriyorum çok sağolun :oops:

- Belirttiğiniz linki inceledim. Yardımcı olacak bileşen ftp adresinde bulunamadı.
Eğer yanlış anlamadıysam;
- Bir Alman sitesinde, WinXP den önceki işletim sistemlerinin bileşenlerini yani 'Kodak Imaging Control' ActiveX bileşenini Win98 CD sinden alıp WinXP altında çalışmasını sağlayan bir yama programını buldum.
programın bulunduğu link:
http://www.lab1.de/Central/Software/System-Tools/IFW-XP
yama programı: "ifw-xp-setup.exe".

-Yanlış birşey yapmak istemiyorum.
Acaba WinXP Pro sistemine zarar verirmi?


Saygı ve sevgiyle kolay gelsin.
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

Selam...

- Bir ader Win98/WinME Install CD'si bulun veya daha kolayı Win98/WinME kurulu bir bilgisayar bulun...

- Aşağıda listesini verdiğim dosyaları CAB dosyaların içinden extract ettirin veya Windows\System dizininden bulup; yeni bir klasöre kopyalayın...

Kod: Tümünü seç

OIUI400.DLL 
OITWA400.DLL 
OIPRT400.DLL 
OISLB400.DLL 
OISSQ400.DLL 
OIADM400.DLL 
OICOM400.DLL 
OIDIS400.DLL 
OIFIL400.DLL 
OIGFS400.DLL 
IMGCMN.DLL 
IMGEDIT.OCX 
IMGSCAN.OCX 
IMGSHL.DLL 
IMGTHUMB.OCX 
IMGADMIN.OCX 
IMGOCXD.HLP 
- Bunları sıkıştırıp saklayın. Bu sizin destek paketinizdir... Lazım olduğunda götüreceğiniz bilgisayarın (XP) Windows\System dizinine kopyalayın ve aşağıdaki kodları yazarak sistem kayıtlarında yer almasını sağlayın...

Kod: Tümünü seç

regsvr32 imgadmin.ocx 
regsvr32 imgedit.ocx 
regsvr32 imgscan.ocx 
regsvr32 imgthumb.ocx 
(regsvr32.exe Windows\system klasörü içinde vardır...)

- Artık sisteminize bu destek eklenmiş oldu... Daha önce bildirdiğim Import Type Library'ye gidip ilgili eklentiyi yapın...

- Kullanıcıya yönelik yapacağınız çalışmada da aynı işlemi yapmalısınız...

- Size yardımcı olacak ek öneri... Programlarınızda dinamizm için şunları yapın...

- Asla TImgScan gibi ActiveX eklentilerini Form'a koyup kullanmayın. Programınıza dahil bir bileşen olamayacağı için, bu desteğin olmadığı bilgisayarlarda programınız hata vererek kırılır... :!:

- ActiveX bileşenleri sadece lazım olduğunda procedure içinde dinamik olarak Create edip işlem sonunda Free edilmelidir... Sebebini aşağıda açıklıyorum...

- En sağlamı FormCreate olayında bir kontrol koyup, program çalışması süresince bir menü elemanının aktif veya pasif duruma getirlimesi suretiyle kullanıma sokun veya kullanıma kapatın...

- Yani; FormCreate olayında koyacağınız Try .. Except bloğu içerisinde TImgScan.Create şeklinde boş bir işlem yapın.. Sistemde tanımlı değilse hata olur ve düştüğü Except bloğunda; Tarayıcı butonunuzun disable edilmesini sağlayın... Hata olmazsa Tarayıcı butonunuzu enable yapın...

- Böylece programın ilk başında tarayıcını olup olmadığına/ ActiveX destek verilip verilmediğine bakarak program içerisinden hata vermesini engellemiş olursunuz... :idea:

- Bu durumda en yukardaki tanımlama işlemini yaparsınız...
Resim
Resim ....Resim
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Mesaj gönderen sertkayasalih »

Merhaba mrmcop;

- Nazik yaklaşımınız, detaylı çözüm önerileriniz ve yardımlarınızla problem çözüldü :)

Herşey için teşekkür eder çalışmalarınızda başarılar dilerim.

Saygı ve sevgiyle....
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

- Memnun oldum... :)

- Çalışmalarınızda başarılar dilerim... 8)
Resim
Resim ....Resim
Kullanıcı avatarı
sertkayasalih
Üye
Mesajlar: 178
Kayıt: 12 Haz 2003 12:47
Konum: Antalya
İletişim:

Mesaj gönderen sertkayasalih »

Merhaba;

mrmcop ve ilgil arkadaşlar,

Programı derledikten sonra, kurulum için InnoSetup kullanacağım.

- InnoSetup ile programı herhangi bir sisteme (Win95, Win98, Win98se, WinXp) kurarken;

- Bu yardımcı dosyaları Windows\system klasörüne kopya ettirbiliyorum.

- Kurulum programı ile Windows\system dizininde
regsvr32 imgadmin.ocx
regsvr32 imgedit.ocx
regsvr32 imgscan.ocx
regsvr32 imgthumb.ocx

olacak şekilde otomatik olarak nasıl bir yol takip edip çalıştırabilirim :?:

Yardımcı olan herkese teşekkürler.
Bilgi; iki tarafı keskin kılıca benzer.
İyi kullanılmazsa, ya karşıyı, ya da sahibini
keser.
Kullanıcı avatarı
mrmarman
Üye
Mesajlar: 4741
Kayıt: 09 Ara 2003 08:13
Konum: İstanbul
İletişim:

Mesaj gönderen mrmarman »

- InnoSetup helpinde anşatılana göre (Register Type Library ile baktım)

Kod: Tümünü seç

RegisterTypeLibrary({app}\imgadmin.ocx);
gibi bir tanımlama ile program dizinindeki ocx'i register etme imkanı gibi bişi var ama bir kontrol etmek lazım, ben daha önce denemedim...

- Deneyen varsa yazarsa ben de sevinirim... Vakit bulduğumda dener buradan ayrıca bildiririm...
Resim
Resim ....Resim
Cevapla