Bonjour, mon programme utilise Quickreport et marche parfaitement sauf sur un où il génère une exception de type inconu.
Voici le code où cela plante (QrPrntr.pas) :
Voyez vous d'où peut venir le problème ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 function TPrinterSettings.Supported(Setting : integer) : boolean; begin if assigned(FPrinter) then Supported := (DevMode^.dmFields and DWORD(Setting)) = DWORD(Setting) <-- ICI else Supported := false; end;
Merci d'avance
Partager