Close a Grid by Double Clicking a Cell

• May 10, 2022

• #2

tomk3

Programmer

Dec 12, 2003

278

Northern germany

Hello,

just an idea : bindevent

Sorry, not near my pc.
regards
tom

 

Upvote 0 Downvote

• May 10, 2022

• Thread starter
• #3

stanlyn

Programmer

Sep 3, 2003

945

US

Hi Tom,

I'll do some research and have never used it...

Thanks,
Stanley

 

Upvote 0 Downvote

• May 10, 2022

• #4

Manuch

Programmer

May 6, 2022

16

IT

If you want to execute code on a double click event of an element just register a listener, like tomk3 suggested, with the BINDEVENT function.


You can check the BINDEVENT documentation here:

https://fox.wikis.com/wc.dll?Wiki~BindEvent

The name of the event you have to register is "dblclick"


You can also register it from the GUI:

 

Upvote 0 Downvote

• May 10, 2022

• #5

tomk3

Programmer

Dec 12, 2003

278

Northern germany

Hello,

basically you can add a method dothefocus to the form
after grid is initialised :
FOR EACH loCol IN Thisform.myGrid.Columns
BINDEVENT( loCol.Text1 , "LostFocus" , Thisform , "dothefocus" )
ENDFOR

or se here for more details and a maybe matching sample :

https://social.msdn.microsoft.com/F...meters-in-bindevent?forum=visualfoxprogeneral

hth
tom

 

Upvote 0 Downvote

• May 10, 2022

• #6

Chris Miller

Programmer

Oct 28, 2020

5,032

DE

If columncount is -1, well, there is no grid, there are no columns, no headers, no records, no grid lines.

I wonder if you overlook something in your usage of the grid. For example, that it grabs an active workarea and adds columns at runtime, if you don't do it at design time. So you use a normal grid with columncount>0 in the end.

Chriss

 

Upvote 0 Downvote

• May 10, 2022

• Thread starter
• #7

stanlyn

Programmer

Sep 3, 2003

945

US

Hi Chriss,

Chriss said:

If columncount is -1, well, there is no grid, there are no columns, no headers, no records, no grid lines.

Click to expand...

This is true at design time, but not true at runtime. The only dblclick method is at the grid level at design time as there are no other grid child controls.

I'm going to play around with Tom's idea as I see looks doable.

Thanks, Stanley

 

Upvote 0 Downvote

• May 11, 2022

• Thread starter
• #8

stanlyn

Programmer

Sep 3, 2003

945

US

Hi Tom.

I got it working and it works perfectly. I used your routine...

Code:

FOR EACH loCol IN Thisform.myGrid.Columns
    BINDEVENT( loCol.Text1 , "LostFocus" , Thisform , "dothefocus" )
ENDFOR

Thanks again,
Stanley

 

Upvote 0 Downvote