Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Using Report Listener Preview Issue
Message
De
06/06/2004 10:27:16
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Visual FoxPro Beta
Divers
Thread ID:
00910174
Message ID:
00910519
Vues:
29
Sergey,

Same problem on my machine with your code.

Dave

>>I just tried to reproduce this and I didn't see what you are seeing. Any chance of posting some stand-alone sample code? You can email me a zip if you like..
>
>Hi Colin,
>
>I'm not using any special forms or reports. Run code below, click on Report button and than right click on the Preview window.
>
>Observed:
>The form jumps on top of preview window and shortcut menu is shown in that form not in the preview window.
>
>Expected:
>The shortcut menu to show up in the preview window in the position of the right-click and the form stay behind the preview window.
>
>Additional Info:
>1. The same result if form is modal.
>2. The same result if existing report is previewed.
>
>
PUBLIC oform1
>
>oform1 = NEWOBJECT("form1")
>oform1.Show
>RETURN
>
>DEFINE CLASS form1 AS form
>
>	DoCreate = .T.
>	Caption = "Form1"
>	WindowType = 0
>	Name = "Form1"
>
>
>	ADD OBJECT command1 AS commandbutton WITH ;
>		Top = 144, ;
>		Left = 144, ;
>		Height = 27, ;
>		Width = 84, ;
>		Caption = "Report", ;
>		Name = "cmdPrint"
>
>
>	PROCEDURE cmdPrint.Click
>		oListener = CREATEOBJECT("ReportListener")
>		oListener.ListenerType = 1 && Preview, or 0 for Print
>
>		CREATE CURSOR test (ii int, cc char)
>		INSERT INTO test VALUES (1, "One")
>		INSERT INTO test VALUES (2, "Two")
>		INSERT INTO test VALUES (3, "Three")
>		CREATE REPORT testxx FROM test
>
>
>		REPORT FORM testxx OBJECT oListener
>	ENDPROC
>ENDDEFINE
>
David Stevenson, MCSD, 2-time VFP MVP / St. Petersburg, FL USA / david@topstrategies.com
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform