Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
BUG: If Left Columns are invisible, Header ToolTips is bad
Message
From
26/06/2003 06:53:32
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Other
Title:
BUG: If Left Columns are invisible, Header ToolTips is bad
Miscellaneous
Thread ID:
00804126
Message ID:
00804126
Views:
57
Hi,

Run this program.
PUBLIC oform1

oform1=NEWOBJECT("form1")
oform1.Show
RETURN

DEFINE CLASS form1 AS form


	DoCreate = .T.
	ShowTips = .T.
	Caption = "Form1"
	Name = "Form1"


	ADD OBJECT grid1 AS grid WITH ;
		ColumnCount = 6, ;
		Height = 200, ;
		Left = 28, ;
		RecordSource = "TEST", ;
		Top = 28, ;
		Width = 320, ;
		Name = "Grid1", ;
		Column2.Visible = .F.,;
		Column3.Visible = .F.,;
		Column5.Visible = .F.,;
		Column3.ColumnOrder = 2	
	PROCEDURE Load
		CREATE CURSOR TEST (A I)
		APPEND BLANK
	ENDPROC


	PROCEDURE Unload
		USE IN TEST
	ENDPROC
	
	PROCEDURE Init
		WITH this.grid1
			.Column1.Header1.Caption = "Header1"
			.Column2.Header1.Caption = "Header2"
			.Column3.Header1.Caption = "Header3"
			.Column4.Header1.Caption = "Header4"
			.Column5.Header1.Caption = "Header5"
			.Column6.Header1.Caption = "Header6"
			.Column1.Header1.ToolTipText = "colonna 1"
			.Column2.Header1.ToolTipText = "colonna 2"
			.Column3.Header1.ToolTipText = "colonna 3"
			.Column4.Header1.ToolTipText = "colonna 4"
			.Column5.Header1.ToolTipText = "colonna 5"
			.Column6.Header1.ToolTipText = "colonna 6"
		ENDWITH
ENDDEFINE
Move mouse on Headers.
Headers ToolTips, showed, on second visible Column,
is the ToolTips of the first Column
of the left group of Columns not visible.
You can move visible columns, bug still.

I can write internal C++ program flush in order to explain of the reason,
but ....
The changes to do on C++ is on 2-3 line of code.

By now my job is that one to bring back bug on this site.

I'm not for nothing content.

Fabio
Next
Reply
Map
View

Click here to load this message in the networking platform