Im folgenden Codebeispiel werden die generische TrueForAll-Methode und mehrere andere generische Methoden veranschaulicht, die den generischen Predicate-Delegaten verwenden.
Es wird ein Array von Zeichenfolgen erstellt, das acht Dinosauriernamen enthält, von denen zwei (an Position 1 und 5) mit "saurus" enden. Im Codebeispiel wird außerdem die Suchprädikatmethode EndsWithSaurus definiert, die einen Zeichenfolgenparameter akzeptiert und einen booleschen Wert zurückgibt, mit dem angegeben wird, ob die Eingabezeichenfolge auf "saurus" endet.
Die Exists-Methode wird beendet und gibt true als erstes Element zurück, für das die Prädikatmethode true zurückgibt. Dies ist in diesem Fall "Amargasaurus".
.gif) Hinweis |
|---|
| In C# und Visual Basic muss der Predicate<string>-Delegat (Predicate(Of String) in Visual Basic) nicht explizit erstellt werden. Diese Sprachen leiten den richtigen Delegaten aus dem Kontext ab und erstellen ihn automatisch. |
Die TrueForAll-Methode wird beendet und gibt false als erstes Element zurück, für das die Prädikatmethode false zurückgibt.
Die Find-Methode durchläuft das Array von Anfang an und übergibt die einzelnen Elemente an die EndsWithSaurus-Methode. Die Suche wird angehalten, wenn die EndsWithSaurus-Methode für das Element "Amargasaurus" true zurückgibt.
Mit der FindLast-Methode wird das Array vom Ende ausgehend rückwärts durchsucht. Sie findet das Element "Dilophosaurus" an Position 5. Mit der FindAll-Methode wird ein Array mit allen Elementen zurückgegeben, die auf "saurus" enden. Die Elemente werden angezeigt.
Imports System
Public Class Example
Public Shared Sub Main()
Dim dinosaurs() As String = { "Compsognathus", _
"Amargasaurus", "Oviraptor", "Velociraptor", _
"Deinonychus", "Dilophosaurus", "Gallimimus", _
"Triceratops" }
Console.WriteLine()
For Each dinosaur As String In dinosaurs
Console.WriteLine(dinosaur)
Next
Console.WriteLine(vbLf & _
"Array.Exists(dinosaurs, AddressOf EndsWithSaurus): {0}", _
Array.Exists(dinosaurs, AddressOf EndsWithSaurus))
Console.WriteLine(vbLf & _
"Array.TrueForAll(dinosaurs, AddressOf EndsWithSaurus: {0}", _
Array.TrueForAll(dinosaurs, AddressOf EndsWithSaurus))
Console.WriteLine(vbLf & _
"Array.Find(dinosaurs, AddressOf EndsWithSaurus): {0}", _
Array.Find(dinosaurs, AddressOf EndsWithSaurus))
Console.WriteLine(vbLf & _
"Array.FindLast(dinosaurs, AddressOf EndsWithSaurus): {0}", _
Array.FindLast(dinosaurs, AddressOf EndsWithSaurus))
Console.WriteLine(vbLf & _
"Array.FindAll(dinosaurs, AddressOf EndsWithSaurus):")
Dim subArray() As String = _
Array.FindAll(dinosaurs, AddressOf EndsWithSaurus)
For Each dinosaur As String In subArray
Console.WriteLine(dinosaur)
Next
End Sub
' Search predicate returns true if a string ends in "saurus".
Private Shared Function EndsWithSaurus(ByVal s As String) _
As Boolean
' AndAlso prevents evaluation of the second Boolean
' expression if the string is so short that an error
' would occur.
If (s.Length > 5) AndAlso _
(s.Substring(s.Length - 6).ToLower() = "saurus") Then
Return True
Else
Return False
End If
End Function
End Class
' This code example produces the following output:
'
'Compsognathus
'Amargasaurus
'Oviraptor
'Velociraptor
'Deinonychus
'Dilophosaurus
'Gallimimus
'Triceratops
'
'Array.Exists(dinosaurs, AddressOf EndsWithSaurus): True
'
'Array.TrueForAll(dinosaurs, AddressOf EndsWithSaurus: False
'
'Array.Find(dinosaurs, AddressOf EndsWithSaurus): Amargasaurus
'
'Array.FindLast(dinosaurs, AddressOf EndsWithSaurus): Dilophosaurus
'
'Array.FindAll(dinosaurs, AddressOf EndsWithSaurus):
'Amargasaurus
'Dilophosaurus
using System;
public class Example
{
public static void Main()
{
string[] dinosaurs = { "Compsognathus",
"Amargasaurus", "Oviraptor", "Velociraptor",
"Deinonychus", "Dilophosaurus", "Gallimimus",
"Triceratops" };
Console.WriteLine();
foreach(string dinosaur in dinosaurs)
{
Console.WriteLine(dinosaur);
}
Console.WriteLine(
"\nArray.Exists(dinosaurs, EndsWithSaurus): {0}",
Array.Exists(dinosaurs, EndsWithSaurus));
Console.WriteLine(
"\nArray.TrueForAll(dinosaurs, EndsWithSaurus): {0}",
Array.TrueForAll(dinosaurs, EndsWithSaurus));
Console.WriteLine(
"\nArray.Find(dinosaurs, EndsWithSaurus): {0}",
Array.Find(dinosaurs, EndsWithSaurus));
Console.WriteLine(
"\nArray.FindLast(dinosaurs, EndsWithSaurus): {0}",
Array.FindLast(dinosaurs, EndsWithSaurus));
Console.WriteLine(
"\nArray.FindAll(dinosaurs, EndsWithSaurus):");
string[] subArray =
Array.FindAll(dinosaurs, EndsWithSaurus);
foreach(string dinosaur in subArray)
{
Console.WriteLine(dinosaur);
}
}
// Search predicate returns true if a string ends in "saurus".
private static bool EndsWithSaurus(String s)
{
if ((s.Length > 5) &&
(s.Substring(s.Length - 6).ToLower() == "saurus"))
{
return true;
}
else
{
return false;
}
}
}
/* This code example produces the following output:
Compsognathus
Amargasaurus
Oviraptor
Velociraptor
Deinonychus
Dilophosaurus
Gallimimus
Triceratops
Array.Exists(dinosaurs, EndsWithSaurus): True
Array.TrueForAll(dinosaurs, EndsWithSaurus): False
Array.Find(dinosaurs, EndsWithSaurus): Amargasaurus
Array.FindLast(dinosaurs, EndsWithSaurus): Dilophosaurus
Array.FindAll(dinosaurs, EndsWithSaurus):
Amargasaurus
Dilophosaurus
*/
using namespace System;
// Search predicate returns true if a string ends in "saurus".
bool EndsWithSaurus(String^ s)
{
if ((s->Length > 5) &&
(s->Substring(s->Length - 6)->ToLower() == "saurus"))
{
return true;
}
else
{
return false;
}
};
void main()
{
array<String^>^ dinosaurs = { "Compsognathus",
"Amargasaurus", "Oviraptor", "Velociraptor",
"Deinonychus", "Dilophosaurus", "Gallimimus",
"Triceratops" };
Console::WriteLine();
for each(String^ dinosaur in dinosaurs )
{
Console::WriteLine(dinosaur);
}
Console::WriteLine("\nArray::Exists(dinosaurs, EndsWithSaurus): {0}",
Array::Exists(dinosaurs, gcnew Predicate<String^>(EndsWithSaurus)));
Console::WriteLine("\nArray::TrueForAll(dinosaurs, EndsWithSaurus): {0}",
Array::TrueForAll(dinosaurs, gcnew Predicate<String^>(EndsWithSaurus)));
Console::WriteLine("\nArray::Find(dinosaurs, EndsWithSaurus): {0}",
Array::Find(dinosaurs, gcnew Predicate<String^>(EndsWithSaurus)));
Console::WriteLine("\nArray::FindLast(dinosaurs, EndsWithSaurus): {0}",
Array::FindLast(dinosaurs, gcnew Predicate<String^>(EndsWithSaurus)));
Console::WriteLine("\nArray::FindAll(dinosaurs, EndsWithSaurus):");
array<String^>^ subArray =
Array::FindAll(dinosaurs, gcnew Predicate<String^>(EndsWithSaurus));
for each(String^ dinosaur in subArray)
{
Console::WriteLine(dinosaur);
}
}
/* This code example produces the following output:
Compsognathus
Amargasaurus
Oviraptor
Velociraptor
Deinonychus
Dilophosaurus
Gallimimus
Triceratops
Array::Exists(dinosaurs, EndsWithSaurus): True
Array::TrueForAll(dinosaurs, EndsWithSaurus): False
Array::Find(dinosaurs, EndsWithSaurus): Amargasaurus
Array::FindLast(dinosaurs, EndsWithSaurus): Dilophosaurus
Array::FindAll(dinosaurs, EndsWithSaurus):
Amargasaurus
Dilophosaurus
*/