delphi - 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;