PB12.NET动态创建菜单

1.新建1个WPF Window，名称为w_main.(Layouts选择Grid，当然也可以选择其他)

2.在XAML窗口中给Grid控件取个名字，方面在代码窗口里调用该控件，这里名为grid，并放1个MultiLineEdit控件.

  <pbwpf:Window x:Class="w_main" xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:pbwpf="clr-namespace:Sybase.PowerBuilder.WPF.Controls;assembly=Sybase.PowerBuilder.WPF.Controls" PBTitle="动态生成菜单" PBHeight="2000" PBWidth="2500" MinBox="True" MaxBox="True" TitleBar="True" ControlMenu="True" Center="True" Resizable="True" Uid="27" Title="动态生成菜单"> <Grid Name="grid"> <Grid.ColumnDefinitions> <ColumnDefinition/> </Grid.ColumnDefinitions> <Grid.RowDefinitions> <RowDefinition Height="*"/> </Grid.RowDefinitions> <pbwpf:MultiLineEdit Grid.Row="0" Margin="0,25,0,0" Name="mle_1" TabOrder="10" Text="none" TextSize="-10" PBHeight="1748" PBWidth="2400" X="0" Y="100" /> </Grid> </pbwpf:Window>  

3.在代码窗口的Open事件中写动态创建代码（由于这里用了StringBuilder ，需要添加mscorlib的引用）

 //动态创建菜单例子 //wxj 2010-08-08 QQ群：119231276 System.IO.FileStream stream System.Object obj System.Windows.Controls.Menu lm_obj Try System.Text.StringBuilder strXMAL strXMAL = create System.Text.StringBuilder("<Menu ") strXMAL.Append('xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" ') strXMAL.Append('xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml " > ') strXMAL.Append('<MenuItem Header="编辑"> ') strXMAL.Append('<MenuItem Command="ApplicationCommands.Cut"/> ') strXMAL.Append('<MenuItem Command="ApplicationCommands.Copy"/> ') strXMAL.Append('<MenuItem Command="ApplicationCommands.Paste"/> ') strXMAL.Append('</MenuItem> ') strXMAL.Append("</Menu> ") obj =System.Windows.Markup.XamlReader.Parse(strXMAL.ToString()); lm_obj = obj if not IsNull(lm_obj) then grid.Children.@Insert(0,lm_obj) end if catch(System.Exception cexcept) finally end try 

跟C#很像吧。给人的感觉PB12.NET很像C#的生成器。