Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Printing blank reports from preview
Message
 
 
À
16/09/2005 08:57:15
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Versions des environnements
Visual FoxPro:
VFP 8
OS:
Windows XP
Network:
Windows 2000 Server
Database:
MS SQL Server
Divers
Thread ID:
01050188
Message ID:
01050223
Vues:
34
If you add a report field with expression 'ALIAS()' (w/o quotes) would it show correct alias?

>Here you go Sergey,
>
>
>RepoWin = Createobject("RepoForm")
>RepoWin.Caption = "[Report] : " + Juststem(lcFileName)
>	
>lcOutPut = "PREVIEW"
>If "PRINTER" $ lcOutPut
>	Report Form GetFullReportPath(lcFileName) To Printer NOCONSOLE
>Else
>	RepoWin.WindowState = 2
>	RepoWin.Name = "RepoWin"
>	RepoWin.Visible	= .T.
>	Report Form GetFullReportPath(lcFileName) &lcOutPut Window RepoWin
>EndIf
>		
>Define Class RepoForm As Form
>	BorderStyle = 3
>	BackColor = Rgb(255,255,255)
>	ControlBox = .F.
>	MaxButton = .F.
>	MinButton = .F.
>	Closable = .T.
>	ZoomBox = .T.
>	ScrollBars = 2
>	Left = 0
>	Top = 0
>	AutoCenter	=	.T.
>	Visible	    =	.F.
>Enddefine
>
>
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform