🚀 go-pugleaf

Thanks Geoff,
The fields are not on a grid but anyway there is the 4 fields.
A snippet of the program follows:

   this.BOOK1.TEXT20 = new TEXT(this.BOOK1)
   with (this.BOOK1.TEXT20)
      height = 1
      left = 2
      top = 3.5789
      width = 10
      colorNormal = "BtnText"
      alignVertical = 1	// Middle
      alignHorizontal = 2	// Right
      transparent = true
      fontName = "MS Sans Serif"
      fontSize = 8
      text = "REG. NO.:"
      pageno = 3
   endwith


   this.BOOK1.ENTRYFIELD14 = new ENTRYFIELD(this.BOOK1)
   with (this.BOOK1.ENTRYFIELD14)
      dataLink =
parent.parent.DMREGO.ref.clients1.rowset.fields["REG_NO"]
      enabled = false
      height = 1
      left = 12.5
      top = 3.5789
      width = 5.6667
      picture = "9999"
      fontName = "MS Sans Serif"
      fontSize = 8
      fontBold = true
      validRequired = true
      pageno = 3
      borderStyle = 7	// Client
   endwith


   this.BOOK1.TEXT18 = new TEXT(this.BOOK1)
   with (this.BOOK1.TEXT18)
      height = 1
      left = 12.5
      top = 5
      width = 11.1667
      colorNormal = "BtnText"
      alignVertical = 1	// Middle
      alignHorizontal = 2	// Right
      transparent = true
      fontName = "MS Sans Serif"
      fontSize = 8
      text = "Given Name:"
      pageno = 3
   endwith


   this.BOOK1.TEXT21 = new TEXT(this.BOOK1)
   with (this.BOOK1.TEXT21)
      height = 1
      left = 28
      top = 5
      width = 8.6667
      colorNormal = "BtnText"
      alignVertical = 1	// Middle
      transparent = true
      fontName = "MS Sans Serif"
      fontSize = 8
      text = "Surname:"
      pageno = 3
   endwith


   this.BOOK1.TEXT19 = new TEXT(this.BOOK1)
   with (this.BOOK1.TEXT19)
      height = 1
      left = 43.5
      top = 5.0526
      width = 8.3333
      colorNormal = "BtnText"
      alignVertical = 1	// Middle
      transparent = true
      fontName = "MS Sans Serif"
      fontSize = 8
      text = "Age:"
      pageno = 3
   endwith


   this.BOOK1.TEXT22 = new TEXT(this.BOOK1)
   with (this.BOOK1.TEXT22)
      height = 1
      left = 51.3333
      top = 5
      width = 8.3333
      colorNormal = "BtnText"
      alignVertical = 1	// Middle
      transparent = true
      fontName = "MS Sans Serif"
      fontSize = 8
      text = "Sex:"
      pageno = 3
   endwith


   this.BOOK1.TEXT23 = new TEXT(this.BOOK1)
   with (this.BOOK1.TEXT23)
      height = 1
      left = 2
      top = 6.0526
      width = 10
      colorNormal = "BtnText"
      alignVertical = 1	// Middle
      alignHorizontal = 2	// Right
      transparent = true
      fontName = "MS Sans Serif"
      fontSize = 8
      text = "CHILD 1:"
      pageno = 3
   endwith


AND A BIT MORE BELOW:

   // {Linked Method} form.readModal
   function formReadModal
      // opened as dialog
      // turn off table view and invoice button.
      // turn on OK and Cancel buttons
      this.newID = null
      this.canClose := {||false}
      with ( this.book1 )
         dataSource := "ARRAY {'Append'}"
         tabstop    := false
         buttonInvoice.visible := false
         buttonOK.visible      := true
         buttonCancel.visible  := true
      endwith
      class::prepareForm()
      super::formOnSize( 0, this.width, this.height )
   return ( ClientsForm::readModal() )
Regards,

Russell Coghlan

On Wed, 12 Aug 1998 21:34:49 +0800, "Geoff S. Wass" <gswass@ibm.net>
wrote:

>Russell,
>
>In your children grid, are you seeing 4 columns but only 3 contain data
>OR are you seeing only 3 columns?
>
>Post a snippet of your program for the grid that displays the children
>information.
>
>--
>Geoff Wass
>Kuala Lumpur, Malaysia
>
>
>=============================================================
>Please respond to a newsgroup posting by posting a reply (not e-mail).
>In this way, all can help and all can learn!
>
>Report Inprise/Borland bugs!
>http://www.inprise.com/devsupport/bugs/bug_reports.html
>=============================================================
>Triumph is in the first syllable.
>
>