指点 属性页

<P>我看ao 中有个接口Ipropertypage,应该很好用,但是 我却看不明白怎么用!
    Dim p As IPropertyPage
    Set p = New LinePropertiesPropertyPage
    
    p.Show (SW_SHOWNORMAL)</P>
<P>SW_SHOWNORMAL参数是在msdn中查到的， 但是vb中说这个变量没定义,而ao帮助上说IPropertyPage是msdn的接口,呵呵  我也不知道该怎么用, 希望高手给予指点!!</P>

<P>Private Sub Command4_Click()
Dim pLayer As ILayer
Set pLayer = MapControl1.Layer(0)
Dim pComPropSheet As IComPropertySheet
  Set pComPropSheet = New ComPropertySheet
  pComPropSheet.Title = "My Layer Properties"
 Dim pPPUID As New UID
  pPPUID.Value = "{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}"
  Dim pDrawPage As IPropertyPage
  Set pDrawPage = New LayerDrawingPropertyPage   'Symbology属性页
  
  pComPropSheet.AddCategoryID pPPUID
  pComPropSheet.AddPage pDrawPage
  
  '请在这里在添加其它属性页
  
  Dim pMySet As ISet
  Set pMySet = New esriCore.Set
  pMySet.Add pLayer
  pMySet.Reset
  
  pComPropSheet.EditProperties pMySet, 0
MapControl1.ActiveView.Refresh</P><P>End Sub</P><P>hope it helps!</P><P>GL!</P>

<P>谢谢您的帮助, </P><P>  Dim pPPUID As New UID
  pPPUID.Value = "{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}"
</P><P>这样的是不是只能在arcmap中才能 UID, 在独立的框架中是不是不能这样调用呀?</P><P>  </P><img src="images/post/smile/dvbbs/em02.gif" />

<P>好象可以哦,但是 不知道该如何改变已经存在的属性页上的东西，比如字体,想把它的英语改成汉语,如何做?</P><P> 呵呵 是不是不可以改呀?</P>

<P>这个好像很困难的，没有提供这种接口，只能自己做属性页了（这个更麻烦）</P>

我说的改动英语到汉语,不是仅仅的小改动,而是所有的出现英语的地方该成汉语, 比如'Symbology属性页 里面的features等字体!  谢谢

<P>今天我尝试着查这个"{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}"
 却没有查找出来, 也没找到LayerDrawingPropertyPage 的id 以及 IPropertyPage
的iid  不知道怎么了, 但是 这个代码是可以用的</P><P>  楼主  能告诉我这个是怎么找的这个"{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}"
的么?</P>

<P>up!!</P><P> 如何找这个UID呀? <TABLE cellSpacing=0 cellPadding=4 width="100%"><TR><TD glow(color=#9898BA,strength=2)" vAlign=center width=*><P>  <FONT color=#990000><B>kisssy斑竹 请回答, 我今天实验了一天 也没找到哦!</B></FONT></P><P><b><FONT color=#990000></FONT></b> </P><P><b><FONT color=#990000>谢谢了</FONT></b></P></TD></TR></TABLE></P>

<P>"{1476C785-6F57-11D2-A2C6-080009B6F22B}" </P><P>这是我的LayerDrawingPropertyPage的UID,与你的不同, 但是 ,具我所知道,这个UID应该是全球唯一的,也就是说我们的应该是一致的才对, 这是怎么会事情, 并且 你的UID也是可以用的, 为什么?</P><P> 斑竹请指点!!!   :) </P><img src="images/post/smile/dvbbs/em01.gif" />

<P>可能我没写清楚，也可能是我偷懒了。</P><P>"{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}"并没有太大关系，你可以改成："{4B5AA17A-F67F-4A25-9B22-D1D23C0781A2}"，甚至你把它注释掉，代码照样运行！</P><P>为什么我写了这个ID，是因为我把代码考过来时懒得改了，Sorry！</P><P>同理：这里pComPropSheet.AddCategoryID pPPUID   也可以注释掉，这样弹出的属性页就是默认的，也就是Arcmap中的Layer Properties</P><P>所以，为什么这里这样写，其实是为了用自己注册的属性页；再一次Sorry，我前面忘记把这个值写入注册表了，应该：</P><P>[HKEY_CLASSES_ROOT\Component Categories\  下新建一项 叫做{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}      在这一项下新建一键：409   键值：My Layer Property Pages</P><P>[HKEY_CLASSES_ROOT\CLSID\{A1A37857-D673-11D2-9F42-00C04F6BC78E}\Implemented Categories\</P><P>新建一项{3B5AA17A-F67F-4A25-9B22-D1D23C0781A2}</P><P>


 </P>