Here is the whole routine - I am reading a ini file and parsing is, then
adding objects (label and textbox) to the form (class in classlib) to
edit then save. The form worked last week and I was just going to add
something to the save method and BAM.
J.
If Empty(goapp.cinifile)
Return
Else
Local x, i, Y, ti, t2
local Array laArray[1]
x= Filetostr(goapp.cinifile)
ntop=40
For i= 1 To Alines(laArray,x)
Y= laArray[i]
If Occurs('*',Y)>0 Or Empty(Y)
Loop
Endif
aValue=Left(Y,At('=',Y)-1)
Parameter=Substr(Y,At('=',Y)+1)
cvalue='c'+aValue
This.AddObject(cvalue,'label')
This.&cvalue..caption=value+':'
This.&cvalue..Top=ntop
This.&cvalue..left=2
This.&cvalue..Visible=.T.
This.AddObject(aValue,'itextbox')
This.&aValue..Value=Parameter
This.&aValue..Top=ntop
This.&aValue..Visible=.T.
This.&aValue..Left=100
This.&aValue..Width=200
ntop=ntop+20
Endfor
Endif
This email message is for the sole use of the intended recipient(s) and may
contain confidential and privileged information. Any unauthorized review, use,
disclosure or distribution is prohibited. If you are not the intended
recipient, please contact the sender by reply email and destroy all copies of
the original message.
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** 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.
