Desmond: Not sure why your double click in the textbox of a grid does not fire. I have many instances where in a readonly = .t. grid the double click / right click event fires and does 'something' in VFP 6 SP5. For example a double click in a memo field in the grid takes that content and displays in in a larger editbox on a separate modal form. Also the rightclick event does the doubleclick method. This is out of a 2 column grid with a checkbox and a textbox. Grid setup: ColumnCount = 2 FontBold = .T. FontSize = 8 AllowRowSizing = .F. DeleteMark = .F. Height = 511 Left = 12 Panel = 1 RecordMark = .F. RowHeight = 17 ScrollBars = 0 TabIndex = 4 ToolTipText = "Click name or check box at left to send the selected file to this scout...click again to uncheck..." Top = 22 Width = 188 Name = "Grid1" Column1.FontBold = .T. Column1.FontSize = 8 Column1.ControlSource = "" Column1.Width = 40 Column1.Movable = .F. Column1.Resizable = .F. Column1.ReadOnly = .F. Column1.Sparse = .F. Column1.Visible = .T. Column1.DynamicBackColor = "IIF(MOD(RECNO(),2)=1,RGB(255,255,255),RGB(192,220,192))" Column1.Name = "Column1" Column2.FontBold = .T. Column2.FontSize = 8 Column2.ControlSource = "" Column2.Enabled = .T. Column2.Width = 145 Column2.Movable = .F. Column2.Resizable = .F. Column2.ReadOnly = .T. Column2.Visible = .T. Column2.SelectOnEntry = .F. Column2.DynamicBackColor = "IIF(MOD(RECNO(),2)=1,RGB(255,255,255),RGB(192,220,192))" Column2.DynamicForeColor = 'iif(t_level<"3",rgb(255,0,0),rgb(0,0,0))' Column2.Name = "Column2"
This is in the textbox methods PROCEDURE DblClick thisform.cntScouts.grid1.column1.check1.value = .f. ENDPROC PROCEDURE Click if thisform.lstAttachments.listcount = 0 then thisform.cntScouts.grid1.column1.check1.value = .f. wait window "Please Make A File Selection Before Selecting A Recipient Scout..." timeout 2 return endif if thisform.lstAttachments.listcount > 0 and thisform.lstAttachments.listindex = 0 then thisform.cntScouts.grid1.column1.check1.value = .f. wait window "Please Make A File Selection Before Selecting A Recipient Scout..." timeout 2 return endif if left(tScouts.t_name,5) = "-----" then thisform.cntScouts.grid1.column1.check1.value = .f. wait window "This Entry Can Not Be Selected..." timeout 2 return endif if tScouts.t_mail then thisform.cntScouts.grid1.column1.check1.value = .f. else thisform.cntScouts.grid1.column1.check1.value = .t. endif thisform.cntScouts.grid1.column1.check1.click() thisform.cntScouts.grid1.refresh() ENDPROC PROCEDURE When if thisform.lstAttachments.listcount = 0 then wait window "Please Make A File Selection Before Selecting A Recipient Scout..." timeout 2 return endif if thisform.lstAttachments.listcount > 0 and thisform.lstAttachments.listindex = 0 then wait window "Please Make A File Selection Before Selecting A Recipient Scout..." timeout 2 return endif ENDPROC The checkbox control has basically more of the same... Perhaps this will allow you to compare why your events are not firing. Jack Jack Skelley Senior Director, Programming/Computer Operations New Jersey Devils (973)757-6164 [email protected] ________________________________________ From: ProfoxTech [[email protected]] on behalf of Desmond Lloyd [[email protected]] Sent: Monday, May 05, 2014 3:39 PM To: [email protected] Subject: VFP6: Silly Grid Question OK, Defined a grid, data is not changed in the grid, display only. Marked the grid as read only, works fine, however I would like to have the user double click on a row and execute the click method of a button on the form. (Display details) Put the code in the double click event and no joy. Changed grid from read only and make the individual columns read only. Data is not changeable, have added the thisform.cmdedit.click() in various double click methods in the text property, column and the grid, all to no avail... Is this possible in VFP6, read only data displayed, double click somewhere and execute a button click? Regards, Desmond --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html --- [excessive quoting removed by server] _______________________________________________ Post Messages to: [email protected] Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/7d9e7f72b813014c8fd022cf04f820edf36ce...@ex08.drdad.thenewarkarena.com ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
