Windows Image Aquisition (WIA) Scanner ansteuern

[Garfield]

Da ich ein einfaches Kopierprogramm benötige, habe ich mir das Beispiel oben angesehen. Dabei habe ich festgestellt, dass die in den Uses der Unit1 eingetragene WIALib_TLB nicht benötigt wird weil bereits alles in der Unit WindowsImageAquisition enthalten ist. Ausserdem ist in der Unit WindowsImageAquisition ein kleiner Fehler vorhanden.

In der function TWiaScanner.Scan wird für den Scan eine temporäre Datei (Zeile 907) erstellt:

    TmpFile:= GetTempFileName('~scan') + '.tmp';

Damit wird ein Dateiname zum Beispiel <Pfad>\~scan00EB2EE8..tmp erstellt. Diese Datei wird dann nach dem Laden gelöscht (Zeile 918):

        DeleteFile(TmpFile);

Zurück bleibt eine Datei <Pfad>\~scan00EB2EE8 mit der Größe 0. Am besten die Dateierweiterung oder mindestens deren . weglassen.