Subject |
Re: Data not visable |
From |
Bob McKinney <bmckinney@gmail.com> |
Date |
Sun, 22 Mar 2020 04:04:40 -0400 |
Newsgroups |
dbase.getting-started |
Don't bother with this post as I finally figured the problem out. It had to do with the highlight colors. The data was still displayed, I just couldn't see it Thanks anyway...…….Bob
>Bob McKinney Wrote:
> Another clue, I hope. On an old existing form having a field that contains data, to edit that field you would normally place the pointer on any part that you want to edit an rht/click to start editing. The current data displayed would always be visible.
> Now when I click on the field the data disappears and the color changes. As long a that field has focus, no data my be seen. By clicking on another field that changes the focus, the contents of previous, blank field now reappears.
> I hope the additional info will help any good soul that has seen my post......Bob
>
>
> >Bob McKinney Wrote:
>
> > this problem is contaminating all entry fields on all existing forms , so it must be in the "MyControls" code somewhere. If I had a clue as to what would cause such a thing, I would the search for such incorrect code. When the programmer is 96 the old think tank is rather slow. Thhanks for any help..Bob
> >
> >
> >
> > ?Bob McKinney Wrote:
> >
> > > I am still using DB2.8 w/W10(home). I only progrm for my personal use. I have a new problem, when I place a new entryfield on a form (old or new), the field will accept date but you can't see it until you "save". Then the data is visable and was entered in a table. I don't have a clue what caused the problem or haow to corect it.
> > > Below is my code from "MyControls MyEntryField" : Any help for this problem, greatly appreciated....Bob
> > >
> > >
> > > ********
> > > class MYENTRYFIELD(parentObj, name) of ENTRYFIELD(parentObj, name) custom
> > > with (this)
> > > // onGotFocus = {;this.keyboard( "}Home}" )} // ?
> > > height = 5.0
> > > left = 3.0
> > > top = 1.5
> > > width = 13.0
> > > metric = 6 // Chars
> > > colorHighLight = "white/Yellow"
> > > value = "MyEntryField"
> > > selectAll = false // This value was false, testing I
> > > // changed to true, that did not help my problem
> > >
> > > endclass
> > >
> > >
> > > ************ code for a test form
> > >
> > > ** END HEADER -- do not remove this line
> > > //
> > > // Generated on 03/21/2020
> > > //
> > > parameter bModal
> > > local f
> > > f = new testtransForm()
> > > if (bModal)
> > > f.mdi = false // ensure not MDI
> > > f.readModal()
> > > else
> > > f.open()
> > > endif
> > >
> > > class testtransForm of BASE_CFORM from :BMCustom:base.cfm
> > > set procedure to :PSource:aponts.dmd additive
> > > set procedure to :BMCustom:mycontrols.cc additive
> > > with (this)
> > > height = 423.0
> > > width = 558.0
> > > endwith
> > >
> > > this.APONTSDATAMODULE1 = new APONTSDATAMODULE()
> > > this.APONTSDATAMODULE1.parent = this
> > > with (this.APONTSDATAMODULE1)
> > > left = 455.0
> > > top = 297.0
> > > endwith
> > >
> > > with (this.TITLETEXT)
> > > text = "Test for Transparent Form"
> > > endwith
> > >
> > > this.MYENTRYFIELD1 = new MYENTRYFIELD(this)
> > > with (this.MYENTRYFIELD1)
> > > dataLink = form.apontsdatamodule1.aponts1.rowset.fields["name"]
> > > height = 33.0
> > > left = 196.0
> > > top = 143.0
> > > width = 119.0
> > > endwith
> > >
> > > this.MYTOOLBARV1 = new MYTOOLBARV(this)
> > > with (this.MYTOOLBARV1)
> > > left = 392.0
> > > top = 44.0
> > > width = 101.0
> > > height = 336.0
> > > endwith
> > >
> > > this.MYTEXTLABEL1 = new MYTEXTLABEL(this)
> > > with (this.MYTEXTLABEL1)
> > > height = 18.0
> > > left = 119.0
> > > top = 154.0
> > > width = 75.0
> > > transparent = false
> > > endwith
> > >
> > > this.rowset = this.apontsdatamodule1.aponts1.rowset
> > >
> > > endclass
> > >
> >
>
|
|