Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Grid refreshing
Message
 
To
07/08/2001 13:29:06
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00540286
Message ID:
00540842
Views:
15
>>
>>No my capslock was on for a moment b4 I realized it. I only shout at my kids.
>>So what I am describing is normal behavior? That grid items are not clickable?
>
>:) They're, but control (text1) gets click event not grid. If you code :
>
>this.parent.parent.click
>
>In column.text1 then it calls grid's click. W/o other shortcuts and creating a class you could code this all grid controls like this :
>-In form designer select your grid
>-Go to command window
>-modi comm xx
>
>
lcCommStr = 'this.parent.parent.click'
>aselobj(arrGrid)
>for each oColumn in arrGrid[1].Columns
>  for each oControl in oColumn.Controls
>      oControl.WriteMethod('Click',lcCommStr)
>  endfor
>endfor
>
Select code, right click and execute selection.
>If you don't have fancy controls like container, pageframe etc in grid this work as a temporary version (temp because too much unnecessary code in grid).
>
>Another slick way could be like (I would try this first):
>
>Grid.BeforeRowColChange - maybe in when if coming from another control
>lparameters nColIndex
>this.Tag = iif(mdown(),'click','')
>
>*Grid.AfterRowColChange
>lparameters nColIndex
>if this.Tag='click'
> this.Tag=''
> this.Click
>endifCetin
This seems a bit complicated and not sure where to implement. I have not delved into that complexity yet. So I created a label called 'Delete' which takes care of it. Also, I now want to know if it's possible to change the font of the grid.activerow to Italics such as in object.FontItalic[ = lExpr]
"Build a man a fire, and he's warm for a day.
Set a man on fire, and he's warm for the rest of his life."
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform