From 834114249ff53298e9e3280138ae3afd08e7eee4 Mon Sep 17 00:00:00 2001
From: Thorsten Sommer <mail@tsommer.org>
Date: Sat, 27 Jul 2024 21:07:40 +0200
Subject: [PATCH] Added configuration component for numeric sliders

---
 .../Blocks/ConfigurationSlider.razor          |  8 ++
 .../Blocks/ConfigurationSlider.razor.cs       | 95 +++++++++++++++++++
 2 files changed, 103 insertions(+)
 create mode 100644 app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor
 create mode 100644 app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor.cs

diff --git a/app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor b/app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor
new file mode 100644
index 00000000..a76bc21a
--- /dev/null
+++ b/app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor	
@@ -0,0 +1,8 @@
+@typeparam T
+@inherits ConfigurationBase
+
+<MudField Label="@this.OptionDescription" Variant="Variant.Outlined" Class="mb-3">
+    <MudSlider @ref="@this.slider" T="@T" Size="Size.Medium" Value="@this.Value()" ValueChanged="@this.OptionChanged" Min="@this.Min" Max="@this.Max" Step="@this.Step" Immediate="@true">
+        @this.Value() @this.Unit
+    </MudSlider>
+</MudField>
\ No newline at end of file
diff --git a/app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor.cs b/app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor.cs
new file mode 100644
index 00000000..8b34fc6a
--- /dev/null
+++ b/app/MindWork AI Studio/Components/Blocks/ConfigurationSlider.razor.cs	
@@ -0,0 +1,95 @@
+using System.Numerics;
+
+using AIStudio.Tools;
+
+using Microsoft.AspNetCore.Components;
+
+namespace AIStudio.Components.Blocks;
+
+public partial class ConfigurationSlider<T> : ConfigurationBase, IMessageBusReceiver where T : struct, INumber<T>
+{
+    /// <summary>
+    /// The minimum value for the slider.
+    /// </summary>
+    [Parameter]
+    public T Min { get; set; } = T.Zero;
+
+    /// <summary>
+    /// The maximum value for the slider.
+    /// </summary>
+    [Parameter]
+    public T Max { get; set; } = T.One;
+
+    /// <summary>
+    /// The step size for the slider.
+    /// </summary>
+    [Parameter]
+    public T Step { get; set; } = T.One;
+
+    /// <summary>
+    /// The unit to display next to the slider's value.
+    /// </summary>
+    [Parameter]
+    public string Unit { get; set; } = string.Empty;
+    
+    /// <summary>
+    /// The value used for the slider.
+    /// </summary>
+    [Parameter]
+    public Func<T> Value { get; set; } = () => T.Zero;
+    
+    /// <summary>
+    /// An action which is called when the option is changed.
+    /// </summary>
+    [Parameter]
+    public Action<T> ValueUpdate { get; set; } = _ => { };
+    
+    /// <summary>
+    /// Is the option disabled?
+    /// </summary>
+    [Parameter]
+    public Func<bool> Disabled { get; set; } = () => false;
+
+    private MudSlider<T> slider = null!;
+    
+    #region Overrides of ComponentBase
+
+    protected override async Task OnInitializedAsync()
+    {
+        // Register this component with the message bus:
+        this.MessageBus.RegisterComponent(this);
+        this.MessageBus.ApplyFilters(this, [], [ Event.CONFIGURATION_CHANGED ]);
+        
+        await base.OnInitializedAsync();
+    }
+
+    #endregion
+    
+    private async Task OptionChanged(T updatedValue)
+    {
+        this.ValueUpdate(updatedValue);
+        await this.SettingsManager.StoreSettings();
+        await this.InformAboutChange();
+    }
+    
+    #region Implementation of IMessageBusReceiver
+
+    public Task ProcessMessage<TMsg>(ComponentBase? sendingComponent, Event triggeredEvent, TMsg? data)
+    {
+        switch (triggeredEvent)
+        {
+            case Event.CONFIGURATION_CHANGED:
+                this.StateHasChanged();
+                break;
+        }
+
+        return Task.CompletedTask;
+    }
+
+    public Task<TResult?> ProcessMessageWithResult<TPayload, TResult>(ComponentBase? sendingComponent, Event triggeredEvent, TPayload? data)
+    {
+        return Task.FromResult<TResult?>(default);
+    }
+
+    #endregion
+}
\ No newline at end of file