I am a beginner and have not used the EpiViewNotification form event?
Would I add the code as a new private Sub module and
call it from the if statement?
Â
Test code does not return anything at all.
I am logging all the way out and back in to be sure to get the custom form.
Â
Thanks
Doug
Would I add the code as a new private Sub module and
call it from the if statement?
Â
Test code does not return anything at all.
I am logging all the way out and back in to be sure to get the custom form.
Â
Thanks
Doug
--- On Wed, 2/4/09, Vic Drecchio <vic.drecchio@...> wrote:
From: Vic Drecchio <vic.drecchio@...>
Subject: RE: [Vantage] Re: TextBox Customization How can I make it Readonly
To: vantage@yahoogroups.com
Date: Wednesday, February 4, 2009, 10:11 AM
Have you tried putting that all in the EpiViewNotification form event?
Does the "Test Code" reveal any errors?
-----Original Message-----
From: vantage@yahoogroups .com [mailto:vantage@yahoogroups .com] On Behalf Of bw2868bond
Sent: Wednesday, February 04, 2009 11:03 AM
To: vantage@yahoogroups .com
Subject: [Vantage] Re: TextBox Customization How can I make it Readonly
Don't see why that would not work.
Are you actually calling SetExtendedProps( )
in the InitializeCustomCod e ?
--- In vantage@yahoogroups .com, Doug Davis <ddavis4569@ ...> wrote:
>
> Does anyone know how to make the textbox to be readonly.
> Setting the property of the textbox for Part.Number01 readonly =
true does not work.
> Â
> I have tried using the Script Editor following the help example
and still can not get the textbox to appear as readonly.
> Â
> This is what I was trying to use.
> Â
> To extend the properties of an EpiDataView, create the below method
and call it from the InitializeCustomCod e() method:
> Private Sub SetExtendedProps( )
> `// Get
> Dim edv As EpiDataView = CType(oTrans. EpiDataViews( "Part"),
EpiDataView)
> If edv.dataView. Table.Columns. Contains( "Number01" ) Then
> Â Â edv.dataView. Table.Columns( "Number01" ).ExtendedProper ties
("ReadOnly") = True
> Â Â edv.dataView. Table.Columns( "Number01" ).ExtendedProper ties
("Enabled") = False
> `// or to make invisible...
> `edv.dataView. Table.Columns( "Number01" ).ExtendedProper ties
("IsHidden") = False
> End if Â
> End Sub
>
> Thanks for any Help
> Dou
>
>
>
>
> [Non-text portions of this message have been removed]
>
------------ --------- --------- ------
Useful links for the Yahoo!Groups Vantage Board are: ( Note: You must have already linked your email address to a yahoo id to enable access. )
(1) To access the Files Section of our Yahoo!Group for Report Builder and Crystal Reports and other 'goodies', please goto: http://groups. yahoo.com/ group/vantage/ files/.
(2) To search through old msg's goto: http://groups. yahoo.com/ group/vantage/ messages
(3) To view links to Vendors that provide Vantage services goto: http://groups. yahoo.com/ group/vantage/ linksYahoo! Groups Links
[Non-text portions of this message have been removed]