diff --git a/src/Avalonia.FuncUI/Avalonia.FuncUI.fsproj b/src/Avalonia.FuncUI/Avalonia.FuncUI.fsproj
index b53a4370..64cdb065 100644
--- a/src/Avalonia.FuncUI/Avalonia.FuncUI.fsproj
+++ b/src/Avalonia.FuncUI/Avalonia.FuncUI.fsproj
@@ -155,6 +155,7 @@
     <Compile Include="DSL\Viewbox.fs" />
     <Compile Include="DSL\SelectableTextBlock.fs" />
     <Compile Include="DSL\DataGrid.fs" />
+    <Compile Include="DSL\PathIcon.fs" />
     <Compile Include="DSL\DragDrop.fs" />
   </ItemGroup>
 
diff --git a/src/Avalonia.FuncUI/DSL/PathIcon.fs b/src/Avalonia.FuncUI/DSL/PathIcon.fs
new file mode 100644
index 00000000..cb32cecd
--- /dev/null
+++ b/src/Avalonia.FuncUI/DSL/PathIcon.fs
@@ -0,0 +1,19 @@
+namespace Avalonia.FuncUI.DSL
+
+[<AutoOpen>]
+module PathIcon =
+    open Avalonia.Media
+    open Avalonia.FuncUI.Builder
+    open Avalonia.FuncUI.Types
+    open Avalonia.Controls
+    
+    let create (attrs: IAttr<PathIcon> list): IView<PathIcon> =
+        ViewBuilder.Create<PathIcon>(attrs)
+     
+    type PathIcon with
+
+        static member data<'t when 't :> PathIcon>(geometry: Geometry) : IAttr<'t> =
+            AttrBuilder<'t>.CreateProperty<Geometry>(PathIcon.DataProperty, geometry, ValueNone)
+            
+        static member data<'t when 't :> PathIcon>(data: string) : IAttr<'t> =
+            data |> Geometry.Parse |> PathIcon.data
\ No newline at end of file