Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Odd Preview Window Behavior
Message
De
02/06/2005 16:27:34
 
 
À
26/05/2005 17:17:15
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01017308
Message ID:
01019571
Vues:
32
Sorry for the late reply, Memorial Day weekend and a busy week after...

Here's the code:
TRY

PUBLIC loForm

loForm = CREATEOBJECT('myForm')
loForm.Show()
loForm.RunReport()

READ EVENTS


CATCH TO oException
		

ENDTRY

DEFINE CLASS myForm as Form

ShowWindow = 2 &&as top level form
WindowState = 2 && Maximized



PROCEDURE RunReport()
	
	SET REPORTBEHAVIOR 90
	
	loListener = CREATEOBJECT('ReportListener')
	loListener.ListenerType = 1
	pc = null
	DO (_reportpreview) WITH pc
	pc.TopForm = .T.
	loListener.PreviewContainer = pc
	
	REPORT FORM HOME(1) + "Tools\Filespec\60SCX1.frx" OBJECT loListener
	
	*MESSAGEBOX('test')

ENDPROC 

PROCEDURE destroy
	CLEAR EVENTS
ENDPROC

ENDDEFINE 
The report preview is created inside of "MyForm" - which it shouldn't if it is supposed to be a separate top level form.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform