Delphi Twain和扫描仪状态

Question

我正在尝试使用DelphiTwain (http://delphitwain.sourceforge.net/)获取有关我的扫描仪的一些基本信息 - 获取扫描仪名称和生产者非常简单，但我必须获得扫描仪状态，但无法找到一种方式...

我想知道扫描仪是否 在线，离线（已启用或已分离）...如果可能，如果扫描或处于错误状态。

感谢您的帮助

procedure TForm1.Scan();
var i: Integer;
    Item: TListItem;
begin
    ListView1.Items.Clear;
    Twain.SourceManagerLoaded := TRUE;
    for i := 0 to Twain.SourceCount - 1 do
    begin
      if (i=0) then
          ListView1.Visible := true;
      Item := ListView1.Items.Add;
      ListView1.Items[i].Caption := Twain.Source[i].ProductName;
      With Item.SubItems do
      begin
         Add(Twain.Source[i].Manufacturer);
         Add(Twain.Source[i].VersionInfo);
         Add(Twain.Source[i].ProductFamily);
      end;
    end;
    Twain.SourceManagerLoaded := FALSE;
end;