グリッドビューを使用すると、基になるオブジェクトのリストにバインドされたNumericUpDownコントロールを持つ1つの列があります。問題は、UpDownコントロールのvaluechangedイベントにバインドできることですが、パーセンテージを更新しても、画面(GridView)では更新されません。member.refreshCandidatesGridでgrid.Rebind()を呼び出すと、混乱が発生します(画面がロックされます)。横にボタンを追加し、すべての値を設定した後でそれをクリックすると、member.refreshCandidatesGridを呼び出して再バインドします。everythginは正常に機能します。
2つのアプローチのうちの1つを機能させたいと思います。
スピナーを押して(数値を上下に)、パーセンテージを更新するために使用できるイベント(スピナーのティックごと)を発生させます
そのスピナーフィールドを離れるときにイベントが発生しますが、残念ながら、LostFocusは意味をなす可能性がある唯一のイベントのようであり、スピナーの訴えの間に発生するようです...
アプローチ、コード構造(無関係であっても)についての考えはすべて高く評価されています-事前に感謝します。
XAMLは次のようになります。
<telerik:RadGridView x:Name="candidateGrid" DataContext="{Binding}">
<telerik:RadGridView.Columns>
<telerik:GridViewDataColumn Header="Score" IsFilterable="False"
DataMemberBinding="{Binding score, Mode=TwoWay}" Width="80" >
<telerik:GridViewDataColumn.CellTemplate>
<DataTemplate>
<TextBlock Text="{Binding score}" HorizontalAlignment="Right"/>
</DataTemplate>
</telerik:GridViewDataColumn.CellTemplate>
<telerik:GridViewDataColumn.CellEditTemplate>
<DataTemplate>
<telerik:RadNumericUpDown Loaded="Editor_Loaded" Maximum="10000" UpdateValueEvent="PropertyChanged" IsInteger="True" Minimum="0" ValueChanged="score_ValueChanged"
Value="{Binding score, Mode=TwoWay, UpdateSourceTrigger=Explicit}" Width="60" O />
</DataTemplate>
</telerik:GridViewDataColumn.CellEditTemplate>
</telerik:GridViewDataColumn>
<telerik:GridViewDataColumn Header="Percent" IsReadOnly="True" IsFilterable="False" Width="70">
<telerik:GridViewDataColumn.CellTemplate>
<DataTemplate>
<TextBlock Text="{Binding percent}" HorizontalAlignment="Right"/>
</DataTemplate>
</telerik:GridViewDataColumn.CellTemplate>
</telerik:GridViewDataColumn>
そしてそれは次のようなf#クラスにバインドされています:
namespace BV
open System
open System.Text.RegularExpressions
open System.Windows ;
open System.Windows.Controls;
open System.Windows.Controls.Primitives ;
open System.Windows.Media ;
open Telerik.Windows.Controls;
open Globals
open RpcBV
type Page() as this =
inherit UriUserControl("/BV;component/page.xaml", "page")
// instance data
let mutable brokers = RpcBV.getCandidates()
// bound controls for add candidate
let FE : FrameworkElement = (this.Content :?> FrameworkElement)
let candidateGrid : RadGridView = FE ? candidateGrid
do
firm.ItemsSource <- RpcBV.getFirms()
email.Background <- SolidColorBrush(Colors.Red)
addBtn.IsEnabled <- false
this.refreshCandidatesGrid() ;
member this.refreshCandidatesGrid () =
candidateGrid.ItemsSource <- brokers ;
()
member this.calculatePercentages() =
let totalScore = List.fold (fun acc (candidate: ScorableCandidate) -> acc + candidate.score) 0 brokers
let scoreEm (candidate: ScorableCandidate) =
candidate.percent <- (float candidate.score) / float totalScore * 100.
List.iter scoreEm <| brokers
member this.addCadidate_Click (sender : obj) (args : RoutedEventArgs) =
this.addCandidateFromForm()
this.resetAddCandidateForm()
this.refreshCandidatesGrid()
member this.score_LostFocus (sender : obj) (args : RoutedEventArgs) =
()
member this.score_ValueChanged (o : obj) (arg : RadRangeBaseValueChangedEventArgs) =
this.calculatePercentages()
member this.Editor_Loaded (sender:obj) (args: RoutedEventArgs) =
let ctrl = sender :?> Control;
ctrl.Focus() |> ignore ;
()