FMX.AddressBook.TCustomAddressBook.AllContactsInGroups

Aus RAD Studio API Documentation
Wechseln zu: Navigation, Suche

Delphi

procedure AllContactsInGroups(const AGroups: TAddressBookGroups; var AContacts: TAddressBookContacts);

C++

void __fastcall AllContactsInGroups(TAddressBookGroups* const AGroups, TAddressBookContacts* &AContacts);

Eigenschaften

Typ Sichtbarkeit Quelle Unit Übergeordnet
procedure
function
public
FMX.AddressBook.pas
FMX.AddressBook.hpp
FMX.AddressBook TCustomAddressBook


Beschreibung

Ruft eine Liste aller Kontakte ab, die zu den angegebenen Gruppen gehören.

Mit dieser Methode rufen Sie eine Liste aller Kontakte aus den angegebenen AGroups-Gruppen ab. Der Eingabeparameter AGroups verweist auf eine Gruppenliste.

Beispiele

Sehen Sie sich zur Klärung die folgenden Beispiele an. Diese Codefragmente illustrieren, wie alle Kontakte aus den angegebenen Gruppen Group1 und Group2 aufgelistet werden.

Delphi:
var
  MyGroups: TAddressBookGroups;
  Group1, Group2: TAddressBookGroup;
  MyContacts: TAddressBookContacts;
  s: string;
  i: Integer;

begin
  // Create a list of groups (Group1 and Group2)
  MyGroups := TAddressBookGroups.Create;
  try
    // Group1 and Group2 should be defined earlier
    MyGroups.Add(Group1);
    MyGroups.Add(Group2);
    MyContacts := TAddressBookContacts.Create;
    try
      // Get all contacts from the Group1 and Group2 groups.
      AddressBook1.AllContactsInGroups(MyGroups, MyContacts);
      s := Format('Contacts from the %s and %s groups' + sLineBreak,
        [Group1.Name, Group2.Name]);
      // Output the list of contacts
      for i := 0 to MyContacts.Count - 1 do
        s := s + MyContacts.Items[i].DisplayName + sLineBreak;
      ShowMessage(s);
    finally
      MyContacts.Free;
    end;
  finally
    MyGroups.Free;
  end;

end;
C++Builder:
	TAddressBookGroups *myGroups;
	TAddressBookContacts *myContacts;
	TAddressBookGroup * group1, *group2;
	int i;
	// Create a list of groups (Group1 and Group2)
	myGroups = new TAddressBookGroups();
	__try {
		group1 = groups->Items[0];
		group2 = groups->Items[1];
		myGroups->Add(group1);
		myGroups->Add(group2);
		myContacts = new TAddressBookContacts();
		__try {
			// Get all contacts from the group1 and group2 groups.
			AddressBook1->AllContactsInGroups(myGroups, myContacts);
			UnicodeString s = "Contacts from the " + group1->Name + " and " +
				group2->Name + " groups:" + sLineBreak;
			for (i = 0; i < myContacts->Count; i++) {
				s = s + myContacts->Items[i]->DisplayName + sLineBreak;
			}
			ShowMessage(s);
		}
		__finally {
			myContacts->Free();
		}
	}
	__finally {
		myGroups->Free();
	}


Weitere Informationen und Beispiele finden Sie unter Mobile-Tutorial: Verwenden einer Adressbuch-Komponente (iOS und Android).

Siehe auch