Name Resolving

This application demonstrates how to use the addressbook and how to lookup and verify email addresses.

Example code:

procedure TFrmMain.actCheckNamesExecute(Sender: TObject);
var
  Recipients: IRwEWSRecipients;
  Recipient: IRwEWSRecipient;
  i: Integer;
begin
  // Get an empty recipienttable
  Recipients := EWSSession.CreateRecipients;

  // Fill the recipienttable using the items in the memo
  for i := 0 to memoRecipientList.Lines.Count - 1 do
  begin
    Recipient := Recipients.Add(memoRecipientList.Lines[i]);
    if chBxResolveImmediately.Checked then
      EWSSession.ResolveName(Recipient, chBxRaiseException.Checked);
  end;

  if not chBxResolveImmediately.Checked then
    EWSSession.ResolveNames(Recipients, chBxRaiseException.Checked);

  ShowResolveResults(Recipients);
end;


Screenshot:



Back to Examples