Postupy: Provádění opožděné inicializace objektů
Třída System.Lazy<T> zjednodušuje práci provádění opožděné inicializace a vytváření instancí objektů. Inicializací objektů opožděným způsobem se můžete vyhnout nutnosti je vůbec vytvářet, pokud nejsou nikdy potřeba, nebo můžete jejich inicializaci odložit, dokud nebudou poprvé přístupné. Další informace naleznete v tématu Opožděná inicializace.
Příklad 1
Následující příklad ukazuje, jak inicializovat hodnotu s Lazy<T>. Předpokládejme, že opožděná proměnná nemusí být nutná v závislosti na jiném kódu, který proměnnou nastaví someCondition
na true nebo false.
Dim someCondition As Boolean = False
Sub Main()
'Initializing a value with a big computation, computed in parallel
Dim _data As Lazy(Of Integer) = New Lazy(Of Integer)(Function()
Dim result =
ParallelEnumerable.Range(0, 1000).
Aggregate(Function(x, y)
Return x + y
End Function)
Return result
End Function)
' do work that may or may not set someCondition to True
' ...
' Initialize the data only if needed
If someCondition = True Then
If (_data.Value > 100) Then
Console.WriteLine("Good data")
End If
End If
End Sub
static bool someCondition = false;
//Initializing a value with a big computation, computed in parallel
Lazy<int> _data = new Lazy<int>(delegate
{
return ParallelEnumerable.Range(0, 1000).
Select(i => Compute(i)).Aggregate((x,y) => x + y);
}, LazyThreadSafetyMode.ExecutionAndPublication);
// Do some work that may or may not set someCondition to true.
// ...
// Initialize the data only if necessary
if (someCondition)
{
if (_data.Value > 100)
{
Console.WriteLine("Good data");
}
}
Příklad 2
Následující příklad ukazuje, jak pomocí System.Threading.ThreadLocal<T> třídy inicializovat typ, který je viditelný pouze pro aktuální instanci objektu v aktuálním vlákně.
//Initializing a value per thread, per instance
ThreadLocal<int[][]> _scratchArrays =
new ThreadLocal<int[][]>(InitializeArrays);
// . . .
static int[][] InitializeArrays () {return new int[][]}
// . . .
// use the thread-local data
int i = 8;
int [] tempArr = _scratchArrays.Value[i];
'Initializing a value per thread, per instance
Dim _scratchArrays =
New ThreadLocal(Of Integer()())(Function() InitializeArrays())
' use the thread-local data
Dim tempArr As Integer() = _scratchArrays.Value(i)
' ...
End Sub
Function InitializeArrays() As Integer()()
Dim result(10)() As Integer
' Initialize the arrays on the current thread.
' ...
Return result
End Function