Einzelnen Beitrag anzeigen

pabstie

Registriert seit: 18. Dez 2009
Ort: Offenbach
19 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Sofort Scan mit TDelphiTwain

  Alt 18. Dez 2009, 23:37
hier ist auch mal der code mit dem ich das Scannen starte:

Delphi-Quellcode:
procedure TForm1.GoAcquireClick(Sender: TObject);
var
  SourceIndex: Integer;
begin
  if DelphiTwain1.LoadLibrary then
   begin
    DelphiTwain1.LoadSourceManager();
    SourceIndex := 1;
     if SourceIndex <> -1 then
      begin
        DelphiTwain1.Source[1].Loaded := true ;
        DelphiTwain1.Source[1].TransferMode := ttmFile;
        DelphiTwain1.Source[1].Enabled := True;
      end else ShowMessage('abgebrochen')
     end
   else ShowMessage('Twain nicht installiert')
end;
wenn ich "DelphiTwain1.Source[1].Loaded := true ;" auf FALSE setzte kommt das Windowsmenü nicht mehr aber es passiert auch sonst nichts, wie kann ich ihm sagen scanne jetzt ?


P.S. Was ich jtzt noch rauslesen konnte ist das ich es wohl mit shoeUI deaktivieren kann. Aber ich verstehe noch nicht wo ich das eintragen soll?
  Mit Zitat antworten Zitat