Bonjour tout le monde
j'utilise Delphi 7 et quickreport pour l'impression de mes états de sorties
Je procède comme ceci : je visualise puis j'imprime mon état avec la souris,
mon objectif c'est l'impression avec la [touche entrée]
Merci d'avance
Bonjour tout le monde
j'utilise Delphi 7 et quickreport pour l'impression de mes états de sorties
Je procède comme ceci : je visualise puis j'imprime mon état avec la souris,
mon objectif c'est l'impression avec la [touche entrée]
Merci d'avance
Bonjour,
cela implique certainement (mes souvenirs quickreport ne sont pas récent) de faire ne sorte que le bouton d'impression de la prévisualisation soit le bouton par défaut si j'ai bien compris la demande.
À mon avis c'est seulement en utilisant son propre "prévisualisateur" (TQRPreview si ma mémoire est bonne) que ce sera possible.
Comment ? Je ne me souviens plus exactement mais inspirez-vous de ce que j'ai pu écrire dans ce forum, (forum où aurait dû être posé cette question) ,
j'en parle par exemple ici
MVP Embarcadero
Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
SGBD : Firebird 2.5, 3, SQLite
générateurs États : FastReport, Rave, QuickReport
OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd
Bonjour tout le monde,
Merci SergioMaster pour la réponse, je n'ai pas trouvé de solution à mon problème dans les liens que vous avez proposé,
il me semble que quickreport ne gère pas les évenements pendant la prévisualisation des états,
j'ai même essayé d'utiliser ONKEYDOWN de la forme , rien ne marche, apparemment aucune relation entre la forme et quickrep.
Je continue mes recherches et je vous tiendrai au courant.
Merci.
Bonjour
J'avais cela fait (il y a ...). J'avais mis la fenêtre Preview dans le panel d'une autre Form qui elle avait un tButton avec Default à True. Le panel "parent" contenait le preview et le tButton de la Form récupérait le ENTER pour imprimer, ou j'utiliser l'évènement OnKeypressed de la form (avec Form.KeyPreview à true) pour récupérer le #13 du ENTER. Les deux fonctionnaient en D7.
solilog
C'est exactement à ce procédé que je pensais
MVP Embarcadero
Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
SGBD : Firebird 2.5, 3, SQLite
générateurs États : FastReport, Rave, QuickReport
OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd
Bonjour,
Merci Solilog, j'ai compris un petit peut le principe de ton idée,
je vais essayer de le mettre en application.
Merci.
Bonjour solilog,
Bête et discipliné comme un robot, j'ai suivi pas à pas les étapes que tu as mentionné
dans ta proposition et l'impression ne se fait que par la souris, je ne sais pas ce que j'ai loupé,
je ne perd pas espoir, je continu mes recherches.
Merci.
Bonjour,
et si vous nous fournissiez la partie code ?
MVP Embarcadero
Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
SGBD : Firebird 2.5, 3, SQLite
générateurs États : FastReport, Rave, QuickReport
OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd
Hello,
Comme le dit Sergio, avec du code c'est mieux.
Pouvez-vous m'indiquer (au moins çà):
- le code où la QuickReport form est créée (c'est là qu'il faut la mettre dans le panel (QRepForm.Parent := Panel1);
- le code où le preview est appelé
Et je regarderai ce soir.
solilog
Bonjour,
Merci infiniment pour vos soutiens ,
Je vais vous résumer la situation, j'ai deux formes :
- fetudiant : La forme qui contient le bouton qui fait l'appel de l'impression
Code : Sélectionner tout - Visualiser dans une fenêtre à part bl_e.quickrep1.preview;
- bl_e : La forme qui contient le panel qui lui contient le quickrep1 et le tbutton
le keypreview de BL_E est TRUE
le TBUTTON est à DEFAULT:= true;
au niveau du ONKEYPRESS :
la prévisualisation se fait correctement, mais l'impression ne se fait qu'avec la souris, la touche Entrée ne fonctionne toujours pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part if key=#13 then quickrep1.Print;
Bizarre ce Quickreport
Bonjour,
ce n'est pas assez comme information. On vous demande un dfm, un .pas voir un .dpr (pas forcément celui de votre programme).
Un programme test, sans même des données, peut suffire à voir où vous vous fourvoyez. Dans vos explications je ne vois même pas le TQRPreview
MVP Embarcadero
Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
SGBD : Firebird 2.5, 3, SQLite
générateurs États : FastReport, Rave, QuickReport
OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd
Bonjour
Bon c'est pas mal tu arrives à afficher le preview dans un panel, on avance.
Je n'ai plus QR avec ce Delphi, je vais t'aider sans.
Tu affiches ton Preview comme tu le fais déjà.
1 - sans tButton pour le print
- la form qui contient le panel (qui affiche le preview) est KeyPreview=True
- la procedure OnKeyPressed de cette form contient ton codeJ'ai ajouté assigned() et visible pour ne pas que la form tente d'imprimer hors preview.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure TForm2.FormKeyPress(Sender: TObject; var Key: Char); begin if (Key=#13) and assigned(bl_e) and bl_e.Visible then bl_e.quickrep1.print; end;
2 - avec tButton contenant le print
- le bouton doit être hors du panel qui lui est bloqué par le preview. Ou tu le mets dans un autre panel en dessous),
- il est bien en default=True
- il contient + ou - le même le codeAttention c'est 1 ou 2, tu ne mets pas de tButton si tu utilises 1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 procedure TForm2.Button1Click(Sender: TObject); begin if assigned(bl_e) and bl_e.Visible then bl_e.quickrep1.print; end;
et inversement pas de KeyPreview ni FormKeyPress() si tu tilises 2
solilog
Bonjour,
Je mets à votre disposition en liaison un petit programme en y intégrant les dernières indications de Solilog.
merci
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager