Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Grid Highlighter
Message
De
13/08/2002 16:08:54
John Baird
Coatesville, Pennsylvanie, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Produits tierce partie
Titre:
Grid Highlighter
Divers
Thread ID:
00689324
Message ID:
00689324
Vues:
74
Hello Guys:

Another question for the gurus:


I have a grid with the following prexisting highlights and dynamic colors.
	*Set column text to green if the record is invoiced (i.e. delivered quantities entered.)
	lcCondition = "IIF(!empty(CurInventory.invno)," 
	.column1.DynamicForeColor = lcCondition + " RGB(0,128,0), RGB(0,0,255))"
	.column1.DynamicFontBold = lcCondition + " .t., .f.)"
	.column2.DynamicForeColor = lcCondition + " RGB(0,128,0), RGB(0,0,255))"
	.column2.DynamicFontBold = lcCondition + " .t., .f.)"
	.column8.DynamicForeColor = lcCondition + " RGB(0,128,0), RGB(0,0,255))"
	.column8.DynamicFontBold = lcCondition + " .t., .f.)"
	.column9.DynamicForeColor = lcCondition + " RGB(0,128,0), RGB(0,0,255))"
	.column9.DynamicFontBold = lcCondition + " .t., .f.)"
	.column10.DynamicForeColor = lcCondition + " RGB(0,128,0), RGB(0,0,255))"
	.column10.DynamicFontBold = lcCondition + " .t., .f.)"
	
	*Disable columns 

	*Location name
	.column2.enabled = .f. 
	.column2.backcolor = RGB(192,192,192)
	.column2.forecolor = RGB(0,0,255)
	*Enter Date
	.column8.enabled = .f. 
	.column8.backcolor = RGB(192,192,192)
	.column8.forecolor = RGB(0,0,255)
	*Enter Time
	.column9.enabled = .f. 
	.column9.backcolor = RGB(192,192,192)
	.column9.forecolor = RGB(0,0,255)
	*InvNo
	.column10.enabled = .f. 
	.column10.backcolor = RGB(192,192,192)
	.column10.forecolor = RGB(0,0,255)
I want to highlight the current line, but I am getting nothing except the grid header color and the current colors. Here is what I have in the OnSetPostHighLight:
cHost = this.cHostname
THIS.PARENT.&cHost..SetAll("DynamicBackColor",;
"IIF(RECNO('curInventory')= this.parent.Gridhighlighter1.nRecno,EVAL(this.parent.gridHighlighter1.cHighBackColor),this.backcolor)","Column")

WITH this.parent.grdInventory
	*Set column text to green if the record is invoiced (i.e. delivered quantities entered.)
	lcColor = "IIF(RECNO('curInventory')= this.parent.Gridhighlighter1.nRecno, EVAL(this.parent.gridHighlighter1.cHighForeColor), "  + ;
				  "IIF(!empty(CurInventory.invno), RGB(0,128,0), RGB(0,0,255))) " 

	.column1.DynamicForeColor  = lcColor
	.column2.DynamicForeColor  = lcColor
	.column8.DynamicForeColor  = lcColor
	.column9.DynamicForeColor  = lcColor
	.column10.DynamicForeColor = lcColor
ENDWITH	
So what am I doing wrong here? this worked in another application.
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform