DelphiTwain: Accesar propiedades de Scanner

[Roberto Angulo]

Gracias por la atención, esto es lo que llevo y voy resolviendo el asunto

 
Código Delphi [-]
 
procedure TfrmEmpleados.JvBtnObtener_ActaClick(Sender: TObject);
var
  SourceIndex: Integer;
  XV : WORD ;
begin
  //Try loading the library
  if Twain.LoadLibrary then
  begin
    //Same as SourceManangerLoaded := TRUE
    Twain.LoadSourceManager();
    //Select the source
    SourceIndex := Twain.SelectSource();
    if SourceIndex <> -1 then
      BEGIN
      with Twain.Source[SourceIndex] do
      begin
        //Prepare for transfering using ttmFile mode
        Loaded := TRUE;
        TransferMode := ttmFile;
        ShowUI := False ;
        Enabled := TRUE;
        SetIXResolution(200) ;
      end ;
      END
    else ShowMessage('Cancelado')
  end
  else MessageDlg('No Está Instalado el Controlador Twain NECESARIO', mtError, [mbOK], 0)
end;