Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Cannot update .FRX cursor
Message
De
16/08/2005 14:47:54
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00801887
Message ID:
01041416
Vues:
20
Sergey,

I need to set the tray and the printer that the user has selected.

I cannot update my frx cursor.
	* Get the printer and the tray.
           select(tcprinters)
	lcprinter = ALLTRIM(desc)
	lctray = 'DEFAULTSOURCE=' + tray

	* Set the printer.
	SET PRINTER TO NAME &lcprinter 

	* Set the tray in a copy of the report form.
	COPY FILE c:\codemine\olympic\reports\voucher.frx TO copy.frx
	COPY FILE c:\codemine\olympic\reports\voucher.frt TO copy.frt
				
	USE copy.frx IN 0 ALIAS copy
	GO TOP
				
	ALINES(laprinter, copy.expr)
	lnposition = ASCAN(laprinter, 'DEFAULTSOURCE')
	IF lnposition != 0
		laprinter(lnposition) = lctray
		SAVE TO MEMO copy.expr
	ENDIF 
When SAVE TO MEMO copy.expr gets executed, I get an error message that copy is readonly.
I need to set the tray and the printer that the user has selected.
What is the best way to do this?
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform