Why tooltips won't work for Expressions?

I've noticed that tooltips won't work for expressions. I'm refering to the tooltips VFP provides when the with of the column is smaller than its content. Is there a way to make tooltips work for column1 in the grid below

Public oForm
oForm = Createobject('MyForm')
oForm.Show

Define Class MyForm As Form
Width = 420
Height = 460
showtips=.T.

Add Object grd1 As Grid With ;
left = 10, Top=45, Width=400,Height=200,RecordSource='Orders'

Procedure Load
Use (_samples+'data\orders') In 0
ENDPROC

PROCEDURE init
thisform.grd1.column1.controlsource= "('The quick brown fox jumps over the lazy dog')"
endproc

Enddefine

Answer this question

Why tooltips won't work for Expressions?

Mason Chang
I don't know why. It sounds they have disabled that feature for calculated columns. Probably thinking return value might not be character (or during build of grid based on actual value I don't remember order_id type).

Use an editbox.
David N.4117
As always, Thanks!

Can you explain why this didn't work in my code, and more importantly how can I make it work when I use the visual interface
I am trying to create a class which I can drop into a grid column. The class value will contain a few lines of texts but the width in the grid will always be only 4 digits.

sourvil

Public oForm
oForm = Createobject('MyForm')
oForm.Show

Define Class MyForm As Form
Width = 420
Height = 460
showtips=.T.

Add Object grd1 As Grid With ;
left = 10, Top=45, Width=400,Height=200,RecordSource='crsShow'

Procedure Load
SELECT 'The quick brown fox jumps over the lazy dog' as ttip, * ;
 FROM (_samples+'data\orders') INTO CURSOR crsShow
ENDPROC

PROCEDURE init
this.grd1.columns(1).Width = 30
endproc

Enddefine

Why tooltips won't work for Expressions?

Answer this question