Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problem with DYNAMICCURRENTCONTROL
Message
De
27/04/2015 10:59:03
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Problèmes
Titre:
Problem with DYNAMICCURRENTCONTROL
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows Server 2012
Network:
Windows 2008 Server
Database:
MS SQL Server
Application:
Web
Divers
Thread ID:
01619171
Message ID:
01619171
Vues:
60
Hi @all,

we have a Grid that shows Files; one Column shows an Icon dependent of the File Extension. The different imageControls are added to these column an shown by
DYNAMICCURRENTCONTROL.

Sometimes we got the Error:

Expression is invalid. Use a valid expression for DYNAMICCURRENTCONTROL property.

The Expression is always valid. Where does this error came from? No Errorhandler works... What can i do to
with this
		.AddColumn(this.ColumnCount + 1)

		.Columns[this.ColumnCount].Header1.Caption = goTranslator.Translate("Art")
		.Columns[this.ColumnCount].Header1.alignment = 2

		.Columns[this.ColumnCount].Header1.ToolTipText = 'Art des Dokuments'
		.Columns[this.ColumnCount].ToolTipText = 'Art des Dokuments'
		
		
		.Columns[this.ColumnCount].Sparse = .f.
		.Columns[this.ColumnCount].Alignment = 2
		.Columns[this.ColumnCount].Width = 30
				
		.Columns[this.ColumnCount].inputmask= "!!!"
		
		* Excel
		.Columns[this.ColumnCount].NewObject("imgExcel", "GridImage", "images")
		.Columns[this.ColumnCount].imgExcel.Picture = "pictures\Excel.bmp"
		.Columns[this.ColumnCount].imgExcel.BackStyle = 0
		
		* Word.
		.Columns[this.ColumnCount].NewObject("imgWord", "GridImage", "images")
		.Columns[this.ColumnCount].imgWord.Picture = "pictures\word.bmp"
		.Columns[this.ColumnCount].imgWord.BackStyle = 0
		
		* PDF
		.Columns[this.ColumnCount].NewObject("imgPDF", "GridImage", "images")
		.Columns[this.ColumnCount].imgPDF.Picture = "pictures\PDF.bmp"
		.Columns[this.ColumnCount].imgPDF.BackStyle = 0
		
		.Columns[this.ColumnCount].NewObject("imgMSG", "GridImage", "images")
		.Columns[this.ColumnCount].imgMSG.Picture = "pictures\mail216x16.bmp"
		.Columns[this.ColumnCount].imgMSG.BackStyle = 0
		
		.Columns[this.ColumnCount].DynamicCurrentControl = "iif(vwDokumente2.dokArt = 'XLS', 'imgExcel', iif(vwDokumente2.dokArt='DOC', 'imgWord', iif(vwDokumente2.dokArt='PDF', 'imgPDF', iif(vwDokumente2.dokArt='MSG','imgMSG','Text1'))))"

		.Columns[this.ColumnCount].ControlSource = "dokArt"

endwith
Jörg Schneider
Joerg.Schneider@SMARTCRM.de
SMARTCRM CRM powered by MS Visual FoxPro
SMARTCRM GmbH
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform