Date field in Grid Not working

Plateforme Level Extreme

Abonnement

Profil corporatif

Produits & Services

Support

Légal

English

Date field in Grid Not working

Message

08/12/1999 10:52:07

Jeff Whitaker
Techport Consulting
Charlottesville, Virginie, États-Unis

08/12/1999 10:12:46

Nancy Folsom
Pixel Dust Industries
Washington, États-Unis

Information générale

Forum:

Visual FoxPro

Catégorie:

Classes - VCX

Titre:

Re: Date field in Grid Not working

Divers

Thread ID:

00300280

Message ID:

00300349

Vues:

Hi, Tom and Nancy

Tom Include the text box properties also. The text boxes themselves could be set to read only

HTH

Jeff
>
>I'm replying here to ask a question and illustrate the formatting thing I didn't communicate very well. Reply to this message to see the tags in action. :)
>
>As for the question, which columns of data have the problem?
>
>

prepgfChildGrid.Page1.grdGrid.ColumnCount = 13
>pgfChildGrid.Page1.grdGrid.Column1.FontBold = .F
>pgfChildGrid.Page1.grdGrid.Column1.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column1.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column1.ControlSource = "payment.parntidno"
>pgfChildGrid.Page1.grdGrid.Column1.CurrentControl = "cboParentsID"
>pgfChildGrid.Page1.grdGrid.Column1.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column1.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column1.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column1.Name = "Column1"
>pgfChildGrid.Page1.grdGrid.Column2.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column2.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column2.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column2.ControlSource = "payment.site_id"
>pgfChildGrid.Page1.grdGrid.Column2.CurrentControl = "cboSiteID"
>pgfChildGrid.Page1.grdGrid.Column2.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column2.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column2.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column2.Name = "Column2"
>pgfChildGrid.Page1.grdGrid.Column3.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column3.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column3.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column3.ControlSource = "payment.program_id"
>pgfChildGrid.Page1.grdGrid.Column3.CurrentControl = "cboProgramID"
>pgfChildGrid.Page1.grdGrid.Column3.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column3.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column3.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column3.Name = "Column3"
>pgfChildGrid.Page1.grdGrid.Column4.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column4.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column4.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column4.ControlSource = "payment.source_id"
>pgfChildGrid.Page1.grdGrid.Column4.CurrentControl = "cboSourceID"
>pgfChildGrid.Page1.grdGrid.Column4.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column4.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column4.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column4.Name = "Column4"
>pgfChildGrid.Page1.grdGrid.Column5.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column5.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column5.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column5.ControlSource = "payment.schdule_id"
>pgfChildGrid.Page1.grdGrid.Column5.CurrentControl = "cboScheduleID"
>pgfChildGrid.Page1.grdGrid.Column5.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column5.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column5.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column5.Name = "Column5"
>pgfChildGrid.Page1.grdGrid.Column6.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column6.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column6.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column6.ControlSource = "payment.when_id"
>pgfChildGrid.Page1.grdGrid.Column6.CurrentControl = "cboWhenID"
>pgfChildGrid.Page1.grdGrid.Column6.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column6.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column6.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column6.Name = "Column6"
>pgfChildGrid.Page1.grdGrid.Column7.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column7.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column7.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column7.Alignment = 2
>pgfChildGrid.Page1.grdGrid.Column7.ControlSource = "payment.enroll_date"
>pgfChildGrid.Page1.grdGrid.Column7.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column7.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column7.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column7.Name = "Column7"
>pgfChildGrid.Page1.grdGrid.Column8.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column8.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column8.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column8.Alignment = 2
>pgfChildGrid.Page1.grdGrid.Column8.ControlSource = "payment.amount"
>pgfChildGrid.Page1.grdGrid.Column8.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column8.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column8.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column8.Format = "$"
>pgfChildGrid.Page1.grdGrid.Column8.InputMask = "999999999999.99"
>pgfChildGrid.Page1.grdGrid.Column8.Name = "Column8"
>pgfChildGrid.Page1.grdGrid.Column9.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column9.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column9.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column9.Alignment = 2
>pgfChildGrid.Page1.grdGrid.Column9.ControlSource = "payment.anti_termdate"
>pgfChildGrid.Page1.grdGrid.Column9.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column9.Width = 85
>pgfChildGrid.Page1.grdGrid.Column9.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column9.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column9.Name = "Column9"
>pgfChildGrid.Page1.grdGrid.Column10.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column10.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column10.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column10.ControlSource = "payment.act_termdate"
>pgfChildGrid.Page1.grdGrid.Column10.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column10.Width = 70
>pgfChildGrid.Page1.grdGrid.Column10.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column10.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column10.Name = "Column10"
>pgfChildGrid.Page1.grdGrid.Column11.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column11.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column11.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column11.ControlSource = "payment.recert_date"
>pgfChildGrid.Page1.grdGrid.Column11.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column11.Width = 56
>pgfChildGrid.Page1.grdGrid.Column11.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column11.Sparse = .F.
>pgfChildGrid.Page1.grdGrid.Column11.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column11.Format = "R"
>pgfChildGrid.Page1.grdGrid.Column11.InputMask = "99/99/99"
>pgfChildGrid.Page1.grdGrid.Column11.Name = "Column11"
>pgfChildGrid.Page1.grdGrid.Column12.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column12.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column12.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column12.ControlSource = "payment.crecid"
>pgfChildGrid.Page1.grdGrid.Column12.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column12.Width = 70
>pgfChildGrid.Page1.grdGrid.Column12.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column12.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column12.Name = "Column12"
>pgfChildGrid.Page1.grdGrid.Column13.FontBold = .F.
>pgfChildGrid.Page1.grdGrid.Column13.FontName = "Arial"
>pgfChildGrid.Page1.grdGrid.Column13.FontSize = 9
>pgfChildGrid.Page1.grdGrid.Column13.ControlSource = "payment.dlastupdte"
>pgfChildGrid.Page1.grdGrid.Column13.CurrentControl = "Text1"
>pgfChildGrid.Page1.grdGrid.Column13.Width = 56
>pgfChildGrid.Page1.grdGrid.Column13.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.Column13.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Column13.Name = "Column13"
>pgfChildGrid.Page1.grdGrid.Comment = "< FIX_TOP_LEFT>"
>pgfChildGrid.Page1.grdGrid.Height = 128
>pgfChildGrid.Page1.grdGrid.LinkMaster = "vchildplus"
>pgfChildGrid.Page1.grdGrid.ReadOnly = .F.
>pgfChildGrid.Page1.grdGrid.RecordSource = "payment"
>pgfChildGrid.Page1.grdGrid.RowHeight = 24
>pgfChildGrid.Page1.grdGrid.Visible = .T.
>pgfChildGrid.Page1.grdGrid.Width = 714
>pgfChildGrid.Page1.grdGrid.ctitlecolor = -1
>pgfChildGrid.Page1.grdGrid.csearchtext = ""
>pgfChildGrid.Page1.grdGrid.ncolumn = 0
>pgfChildGrid.Page1.grdGrid.extrabuffer = "_VFX_FORM_WIZARD"
>pgfChildGrid.Page1.grdGrid.cfixcolumnlist = "10;11"
>pgfChildGrid.Page1.grdGrid.lediting = .T.
>pgfChildGrid.Page1.grdGrid.lcanupdate = .T.
>pgfChildGrid.Page1.grdGrid.Name = "grdGrid"
>

Répondre

Fil

Voir

Click here to load this message in the networking platform