Suche TWAIN Komponente - für RAD Studio Delphi XE

[haentschman]

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]

Zitat von Andreas2k:

Also ich bekomme die Komponente einfach nicht installiert -

Trial/Test- oder Vollversion?

[Andreas2k]

Zitat von haentschman:

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]

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.