forked from SwensenSoftware/fseye
-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
merged rev. 308-283 from branches/plugin-architecture (branch re-inte…
…gration) since we have made a lot of good progress on the plugin architecture and are ready to accept it into the main development line.
- Loading branch information
stephen.swensen
committed
Jul 6, 2012
1 parent
9226d43
commit 6ef35b9
Showing
20 changed files
with
609 additions
and
68 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,39 @@ | ||
| namespace FsEye.PropertyGrid.Plugin | ||
|
|
||
| open System.Reflection | ||
| open System.Runtime.CompilerServices | ||
| open System.Runtime.InteropServices | ||
|
|
||
| // General Information about an assembly is controlled through the following | ||
| // set of attributes. Change these attribute values to modify the information | ||
| // associated with an assembly. | ||
| [<assembly: AssemblyTitle("FsEye.PropertyGrid.Plugin")>] | ||
| [<assembly: AssemblyDescription("")>] | ||
| [<assembly: AssemblyConfiguration("")>] | ||
| [<assembly: AssemblyCompany("Microsoft")>] | ||
| [<assembly: AssemblyProduct("FsEye.PropertyGrid.Plugin")>] | ||
| [<assembly: AssemblyCopyright("Copyright © Microsoft 2011")>] | ||
| [<assembly: AssemblyTrademark("")>] | ||
|
|
||
| // Setting ComVisible to false makes the types in this assembly not visible | ||
| // to COM components. If you need to access a type in this assembly from | ||
| // COM, set the ComVisible attribute to true on that type. | ||
| [<assembly: ComVisible(false)>] | ||
|
|
||
| // The following GUID is for the ID of the typelib if this project is exposed to COM | ||
| [<assembly: Guid("02476582-997c-4780-859a-e81188e8339b")>] | ||
|
|
||
| // Version information for an assembly consists of the following four values: | ||
| // | ||
| // Major Version | ||
| // Minor Version | ||
| // Build Number | ||
| // Revision | ||
| // | ||
| // You can specify all the values or you can default the Build and Revision Numbers | ||
| // by using the '*' as shown below: | ||
| // [assembly: AssemblyVersion("1.0.*")] | ||
| [<assembly: AssemblyVersion("1.0.0.0")>] | ||
| [<assembly: AssemblyFileVersion("1.0.0.0")>] | ||
|
|
||
| () |
68 changes: 68 additions & 0 deletions
68
FsEye.PropertyGrid.Plugin/FsEye.PropertyGrid.Plugin.fsproj
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,68 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> | ||
| <PropertyGroup> | ||
| <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> | ||
| <Platform Condition=" '$(Platform)' == '' ">x86</Platform> | ||
| <ProductVersion>8.0.30703</ProductVersion> | ||
| <SchemaVersion>2.0</SchemaVersion> | ||
| <ProjectGuid>{1f9b8cb8-8c0c-424c-9035-6562b637a233}</ProjectGuid> | ||
| <OutputType>Library</OutputType> | ||
| <RootNamespace>FsEye.PropertyGrid.Plugin</RootNamespace> | ||
| <AssemblyName>FsEye.PropertyGrid.Plugin</AssemblyName> | ||
| <TargetFrameworkVersion>v4.0</TargetFrameworkVersion> | ||
| <TargetFrameworkProfile> | ||
| </TargetFrameworkProfile> | ||
| <Name>FsEye.PropertyGrid.Plugin</Name> | ||
| </PropertyGroup> | ||
| <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' "> | ||
| <DebugSymbols>true</DebugSymbols> | ||
| <DebugType>full</DebugType> | ||
| <Optimize>false</Optimize> | ||
| <Tailcalls>false</Tailcalls> | ||
| <OutputPath>bin\Debug\plugins</OutputPath> | ||
| <DefineConstants>DEBUG;TRACE</DefineConstants> | ||
| <WarningLevel>3</WarningLevel> | ||
| <PlatformTarget>x86</PlatformTarget> | ||
| <DocumentationFile>bin\Debug\FsEye.PropertyGrid.Plugin.XML</DocumentationFile> | ||
| </PropertyGroup> | ||
| <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' "> | ||
| <DebugType>pdbonly</DebugType> | ||
| <Optimize>true</Optimize> | ||
| <Tailcalls>true</Tailcalls> | ||
| <OutputPath>bin\Release\plugins</OutputPath> | ||
| <DefineConstants>TRACE</DefineConstants> | ||
| <WarningLevel>3</WarningLevel> | ||
| <PlatformTarget>x86</PlatformTarget> | ||
| <DocumentationFile>bin\Release\FsEye.PropertyGrid.Plugin.xml</DocumentationFile> | ||
| </PropertyGroup> | ||
| <ItemGroup> | ||
| <Reference Include="mscorlib" /> | ||
| <Reference Include="FSharp.Core" /> | ||
| <Reference Include="System" /> | ||
| <Reference Include="System.Core" /> | ||
| <Reference Include="System.Drawing" /> | ||
| <Reference Include="System.Numerics" /> | ||
| <Reference Include="System.Windows.Forms" /> | ||
| <Reference Include="System.Xml" /> | ||
| </ItemGroup> | ||
| <ItemGroup> | ||
| <Compile Include="AssemblyInfo.fs" /> | ||
| <Compile Include="PropertyGridPlugin.fs" /> | ||
| </ItemGroup> | ||
| <ItemGroup> | ||
| <ProjectReference Include="..\FsEye\FsEye.fsproj"> | ||
| <Name>FsEye</Name> | ||
| <Project>{20de2466-d7b1-4f72-b8f8-51f10f5f186e}</Project> | ||
| <Private>True</Private> | ||
| </ProjectReference> | ||
| </ItemGroup> | ||
| <Import Project="$(MSBuildExtensionsPath32)\FSharp\1.0\Microsoft.FSharp.Targets" Condition="!Exists('$(MSBuildBinPath)\Microsoft.Build.Tasks.v4.0.dll')" /> | ||
| <Import Project="$(MSBuildExtensionsPath32)\..\Microsoft F#\v4.0\Microsoft.FSharp.Targets" Condition=" Exists('$(MSBuildBinPath)\Microsoft.Build.Tasks.v4.0.dll')" /> | ||
| <!-- To modify your build process, add your task inside one of the targets below and uncomment it. | ||
| Other similar extension points exist, see Microsoft.Common.targets. | ||
| <Target Name="BeforeBuild"> | ||
| </Target> | ||
| <Target Name="AfterBuild"> | ||
| </Target> | ||
| --> | ||
| </Project> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,22 @@ | ||
| namespace Swensen.FsEye.Plugins | ||
|
|
||
| open Swensen.FsEye | ||
| open System.Windows.Forms | ||
|
|
||
| ///A PropertyGrid-based watch viewer | ||
| type PropertyGridWatchViewer() = | ||
| inherit PropertyGrid() | ||
| interface IWatchViewer with | ||
| ///Set or refresh the PropertyGride SelectedObject with the given value (the label and type are not currently used). | ||
| member this.Watch(_, value, _) = | ||
| this.SelectedObject <- value | ||
| ///Get the underlying Control of this watch view | ||
| member this.Control = this :> Control | ||
|
|
||
| ///A Plugin that creates PropertyGridWatchViewers | ||
| type PropertyGridPlugin() = | ||
| interface IPlugin with | ||
| member __.Name = "Property Grid" | ||
| member __.Version = "1.0" | ||
| ///Create a new instance of a PropertyGridWatchViewer | ||
| member __.CreateWatchViewer() = new PropertyGridWatchViewer() :> IWatchViewer |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,39 @@ | ||
| namespace FsEye.TreeView.Plugin | ||
|
|
||
| open System.Reflection | ||
| open System.Runtime.CompilerServices | ||
| open System.Runtime.InteropServices | ||
|
|
||
| // General Information about an assembly is controlled through the following | ||
| // set of attributes. Change these attribute values to modify the information | ||
| // associated with an assembly. | ||
| [<assembly: AssemblyTitle("FsEye.TreeView.Plugin")>] | ||
| [<assembly: AssemblyDescription("")>] | ||
| [<assembly: AssemblyConfiguration("")>] | ||
| [<assembly: AssemblyCompany("Microsoft")>] | ||
| [<assembly: AssemblyProduct("FsEye.TreeView.Plugin")>] | ||
| [<assembly: AssemblyCopyright("Copyright © Microsoft 2011")>] | ||
| [<assembly: AssemblyTrademark("")>] | ||
|
|
||
| // Setting ComVisible to false makes the types in this assembly not visible | ||
| // to COM components. If you need to access a type in this assembly from | ||
| // COM, set the ComVisible attribute to true on that type. | ||
| [<assembly: ComVisible(false)>] | ||
|
|
||
| // The following GUID is for the ID of the typelib if this project is exposed to COM | ||
| [<assembly: Guid("d538e069-c83a-4b4b-b59c-bc0ef947290b")>] | ||
|
|
||
| // Version information for an assembly consists of the following four values: | ||
| // | ||
| // Major Version | ||
| // Minor Version | ||
| // Build Number | ||
| // Revision | ||
| // | ||
| // You can specify all the values or you can default the Build and Revision Numbers | ||
| // by using the '*' as shown below: | ||
| // [assembly: AssemblyVersion("1.0.*")] | ||
| [<assembly: AssemblyVersion("1.0.0.0")>] | ||
| [<assembly: AssemblyFileVersion("1.0.0.0")>] | ||
|
|
||
| () |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,68 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> | ||
| <PropertyGroup> | ||
| <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> | ||
| <Platform Condition=" '$(Platform)' == '' ">x86</Platform> | ||
| <ProductVersion>8.0.30703</ProductVersion> | ||
| <SchemaVersion>2.0</SchemaVersion> | ||
| <ProjectGuid>{669bc59d-958a-4096-affe-7776cf68b46e}</ProjectGuid> | ||
| <OutputType>Library</OutputType> | ||
| <RootNamespace>FsEye.TreeView.Plugin</RootNamespace> | ||
| <AssemblyName>FsEye.TreeView.Plugin</AssemblyName> | ||
| <TargetFrameworkVersion>v4.0</TargetFrameworkVersion> | ||
| <TargetFrameworkProfile> | ||
| </TargetFrameworkProfile> | ||
| <Name>FsEye.TreeView.Plugin</Name> | ||
| </PropertyGroup> | ||
| <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' "> | ||
| <DebugSymbols>true</DebugSymbols> | ||
| <DebugType>full</DebugType> | ||
| <Optimize>false</Optimize> | ||
| <Tailcalls>false</Tailcalls> | ||
| <OutputPath>bin\Debug\plugins</OutputPath> | ||
| <DefineConstants>DEBUG;TRACE</DefineConstants> | ||
| <WarningLevel>3</WarningLevel> | ||
| <PlatformTarget>x86</PlatformTarget> | ||
| <DocumentationFile>bin\Debug\FsEye.TreeView.Plugin.XML</DocumentationFile> | ||
| </PropertyGroup> | ||
| <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' "> | ||
| <DebugType>pdbonly</DebugType> | ||
| <Optimize>true</Optimize> | ||
| <Tailcalls>true</Tailcalls> | ||
| <OutputPath>bin\Release\plugins</OutputPath> | ||
| <DefineConstants>TRACE</DefineConstants> | ||
| <WarningLevel>3</WarningLevel> | ||
| <PlatformTarget>x86</PlatformTarget> | ||
| <DocumentationFile>bin\Release\FsEye.TreeView.Plugin.XML</DocumentationFile> | ||
| </PropertyGroup> | ||
| <ItemGroup> | ||
| <Reference Include="mscorlib" /> | ||
| <Reference Include="FSharp.Core" /> | ||
| <Reference Include="System" /> | ||
| <Reference Include="System.Core" /> | ||
| <Reference Include="System.Drawing" /> | ||
| <Reference Include="System.Numerics" /> | ||
| <Reference Include="System.Windows.Forms" /> | ||
| <Reference Include="System.Xml" /> | ||
| </ItemGroup> | ||
| <ItemGroup> | ||
| <Compile Include="AssemblyInfo.fs" /> | ||
| <Compile Include="TreeViewPlugin.fs" /> | ||
| </ItemGroup> | ||
| <ItemGroup> | ||
| <ProjectReference Include="..\FsEye\FsEye.fsproj"> | ||
| <Name>FsEye</Name> | ||
| <Project>{20de2466-d7b1-4f72-b8f8-51f10f5f186e}</Project> | ||
| <Private>True</Private> | ||
| </ProjectReference> | ||
| </ItemGroup> | ||
| <Import Project="$(MSBuildExtensionsPath32)\FSharp\1.0\Microsoft.FSharp.Targets" Condition="!Exists('$(MSBuildBinPath)\Microsoft.Build.Tasks.v4.0.dll')" /> | ||
| <Import Project="$(MSBuildExtensionsPath32)\..\Microsoft F#\v4.0\Microsoft.FSharp.Targets" Condition=" Exists('$(MSBuildBinPath)\Microsoft.Build.Tasks.v4.0.dll')" /> | ||
| <!-- To modify your build process, add your task inside one of the targets below and uncomment it. | ||
| Other similar extension points exist, see Microsoft.Common.targets. | ||
| <Target Name="BeforeBuild"> | ||
| </Target> | ||
| <Target Name="AfterBuild"> | ||
| </Target> | ||
| --> | ||
| </Project> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,19 @@ | ||
| namespace Swensen.FsEye.Plugins | ||
|
|
||
| open Swensen.FsEye | ||
| open Swensen.FsEye.Forms | ||
| open System.Windows.Forms | ||
|
|
||
| type TreeViewWatchViewer() = | ||
| let watchTreeView = new WatchTreeView() | ||
| interface IWatchViewer with | ||
| member this.Watch(label, value, ty) = | ||
| watchTreeView.Watch(label, value, ty) | ||
|
|
||
| member this.Control = watchTreeView :> Control | ||
|
|
||
| type TreeViewPlugin() = | ||
| interface IPlugin with | ||
| member this.Version = "1.0" | ||
| member this.Name = "Tree View" | ||
| member this.CreateWatchViewer() = new TreeViewWatchViewer() :> IWatchViewer |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Oops, something went wrong.