Hi,


Where can I find sample code for WIA use? I have imported
"Microsoft Windows Image Acquisition 1.01 Type Library"
using the Project / Import Type Library menu option. The file
WIALib_TLB.pas was created automatically.


I can get a list of cameras attached to my PC by doing:


  procedure TForm1.FormCreate(Sender: TObject);
  var
      I:      Integer;
      Dev:    IWiaDeviceInfo;
  begin
      wia.Connect;
      Caption := IntToStr(wia.Devices.Count);
      lb.Items.Clear;
      for I := 0 to wia.Devices.Count - 1 do
      begin
          Dev := wia.Devices.Item[I] as IWiaDeviceInfo;
          lb.Items.Add(Dev.Name + ' (' + Dev.Id + ')');
      end;
  end;


where lb is a TListBox and wia is a TWia.


How can I enumerate photos from a camera and then
import those photos?


Thanks,
Luis