RE: VFP6: Silly Grid Question

Author: Jack Skelley

Posted: 2014-05-05 at 15:35:49

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

JSkelley@newjerseydevils.com ________________________________________

From: ProfoxTech [profoxtech-bounces@leafe.com] on behalf of Desmond Lloyd [desmond.lloyd@gmail.com]

Sent: Monday, May 05, 2014 3:39 PM

To: profoxtech@leafe.com

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: ProFox@leafe.com

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/7D9E7F72B813014C8FD022CF04F820EDF36CE559@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.

©2014 Jack Skelley