Bonjour,

Dans une application Delphi Rio en VCL 32 bits, j'utilise pour l'impression un appel Ole au WIA de windows.

Code d'appel :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure ShowPhotoPrintWizard(Files: TStrings);
var
  I: Integer;
  CommonDialog: OleVariant;
  Vector: OleVariant;
begin
  if not Assigned(Files) then Exit;
  CommonDialog := CreateOleObject('WIA.CommonDialog');
  Vector := CreateOleObject('WIA.Vector');
  for I := 0 to Files.Count - 1 do
    Vector.Add(Files[i]);
  CommonDialog.ShowPhotoPrintingWizard(Vector);
  Vector := Unassigned;
  CommonDialog := Unassigned;
end;
Tout fonctionne parfaitement, la fenêtre de dialogue de l’objet Ole s'ouvre au dessus de la fenêtre de mon application, mais dans certains cas ce dialogue part dessous mon application.
A ce moment là, l'utilisateur n'a plus la main et ne peut ni lancer ni abandonner l'impression.

Est-il possible d'afficher cet objet WIA dans un panel ou une fenêtre de mon appli que je puisse le gérer complètement ?

Merci