Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Suche TWAIN Komponente - für RAD Studio Delphi XE (https://www.delphipraxis.net/157258-suche-twain-komponente-fuer-rad-studio-delphi-xe.html)

haentschman 9. Jan 2011 08:21

AW: Suche TWAIN Komponente - für RAD Studio Delphi XE
 
Versuch mal einen anderen Weg der Installation:
- das Projekt TWAIN1 im Ordner öffnen
- in Projektverwaltung rechte Maustaste auf TWAIN1.bpl --> Compillieren
- in Projektverwaltung rechte Maustaste auf TWAIN1.bpl --> Installieren

MEissing 9. Jan 2011 11:57

AW: Suche TWAIN Komponente - für RAD Studio Delphi XE
 
Zitat:

Zitat von Andreas2k (Beitrag 1073344)
Also ich bekomme die Komponente einfach nicht installiert -

Trial/Test- oder Vollversion?

Andreas2k 9. Jan 2011 13:38

AW: Suche TWAIN Komponente - für RAD Studio Delphi XE
 
Zitat:

Zitat von haentschman (Beitrag 1073366)
Versuch mal einen anderen Weg der Installation:
- das Projekt TWAIN1 im Ordner öffnen
- in Projektverwaltung rechte Maustaste auf TWAIN1.bpl --> Compillieren
- in Projektverwaltung rechte Maustaste auf TWAIN1.bpl --> Installieren

Endlich, das hat funktioniert... vielen dank!

musicman56 17. Apr 2012 18:46

AW: Suche TWAIN Komponente - für RAD Studio Delphi XE
 
Hallo Kollegen,

ich hatte die Komponente schon vor dem Umstieg auf XE2 unter 2007 im Einsatz. Hab jetzt die aktualisierte Version installiert, komme aber nicht weiter.

So war die "alte" Version unter D2007

Code:
procedure TFrmScanDlg.Execute;
begin
  DelphiTwain1.LibraryLoaded := TRUE;
  DelphiTwain1.SourceManagerLoaded := TRUE;
  if DelphiTwain1.LibraryLoaded = FALSE then Exit;
  if DelphiTwain1.SourceCount = 0 then exit;
  DelphiTwain1.Source[0].TransferMode := ttmMemory;
  DelphiTwain1.Source[0].Loaded := TRUE;
  DelphiTwain1.Source[0].Enabled := TRUE;
end;
An dieser Stelle unter XE2 jetzt eine Zugriffsverletzung:

DelphiTwain1.Source[0].Loaded := TRUE;

Also hab ich....

Code:
procedure TFrmScanDlg.Execute;
var
  Index: integer;
begin
  DelphiTwain1.LibraryLoaded := TRUE;
  DelphiTwain1.SourceManagerLoaded := TRUE;
  if DelphiTwain1.LibraryLoaded = FALSE then Exit;
  if DelphiTwain1.SourceCount = 0 then exit;
  Index := DelphiTwain1.SelectSource;
  if Index < 0 then begin
    DelphiTwain1.LibraryLoaded := False;
    DelphiTwain1.SourceManagerLoaded := False;
    Exit;
  end;
  DelphiTwain1.Source[Index].TransferMode := ttmMemory;
  DelphiTwain1.Source[Index].Loaded := TRUE;
  DelphiTwain1.Source[Index].Enabled := TRUE;
end;
Es werden zwei Quellen angeboten:

http://otto-herdegen.de/images/twain-source.jpg

Bei der Auswahl Twain (Index "0") nach wie vor die Zugriffsverletzung, bei WIA friert die App ein. (Win7 Ultimate 64Bit) Mit meinen anderen installierten Programmen funktioniert der Scanner. Ich kapier's nicht. Liegt vielleicht auch daran, dass ich mit dem Scanner-Handling keine Erfahrung hab. Ist auch nur ein kleines AddOn in meiner Datenbank-Anwendung, aber sollte trotzdem funktionieren.

Gibt es eine Alternative? Muss nicht kostenlos sein, sollte aber auch nicht gleich meine App unnötig aufblähen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:17 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz