FMX.AddressBook.Types.TContactEmails.AddEmail
Delphi
function AddEmail(const AKind: TContactEmail.TLabelKind; const AEmail: string): TContactEmail; overload;
function AddEmail(const ALabel: string; const AEmail: string): TContactEmail; overload;
C++
TContactEmail* __fastcall AddEmail(const TContactEmail::TLabelKind AKind, const System::UnicodeString AEmail)/* overload */;
TContactEmail* __fastcall AddEmail(const System::UnicodeString ALabel, const System::UnicodeString AEmail)/* overload */;
プロパティ
| 種類 | 可視性 | ソース | ユニット | 親 |
|---|---|---|---|---|
| function | public | FMX.AddressBook.Types.pas FMX.AddressBook.Types.hpp |
FMX.AddressBook.Types | TContactEmails |
説明
連絡先の e メール アドレスのリストに、新しいe メール アドレスを追加します。
このメソッドを使用すると、新しい e メール アドレスを、連絡先関連の e メール アドレスのリストに追加することができます。 このメソッドの入力パラメータで、次の特性を指定することができます：
AEmail： 連絡先のメールを指定します（John.Doe@mycompany.com' など）。AKind： 第 1 オーバーロード メソッドで、このパラメータは連絡先のメールの 種類 を指定します。Alabel： 第 2 オーバーロード メソッドで、このパラメータはテキスト ラベル（"Home"、"Office"、など）を示します。
例
明確にするために、次の例を考えてみましょう。 これらのコード スニペットでは、どのように連絡先の個人の仕事の e メール アドレスを指定し、その連絡先をアドレス帳に保存するかを説明しています。
Delphi：
var
Contact: TAddressBookContact;
eMails: TContactEmails;
begin
Contact := AddressBook1.CreateContact(AddressBook1.DefaultSource);
try
// Add the work mail
eMails := TContactEmails.Create;
try
eMails.AddEmail(TContactEmail.TLabelKind.Work, 'John.Doe@mycompany.com');
Contact.eMails := eMails;
finally
eMails.Free;
end;
AddressBook1.SaveContact(Contact);
finally
Contact.Free;
end;
end;
C++Builder：
TAddressBookContact *Contact;
TContactEmails *eMails;
// Create a new contact
Contact = AddressBook1->CreateContact(AddressBook1->DefaultSource());
__try {
// Add the work mail to the newly created contact
eMails = new TContactEmails();
__try {
eMails->AddEmail(TContactEmail::TLabelKind::Work,
"John.Doe@mycompany.com");
Contact->EMails = eMails;
}
__finally {
eMails->Free();
}
// Save contact to Address Book
AddressBook1->SaveContact(Contact);
}
__finally {
Contact->Free();
}
詳細やサンプルについては、「モバイル チュートリアル：Web ブラウザ コンポーネントを使用する（iOS および Android）」を参照してください。