TAdvTwitter search example

Can you post a small example showing how to display the last 100 posts where some string has appeared (example: @cnn)?


Thank you,
Miguel

Hi,


This is an example of how you can use the TAdvTwitter.Search method.

var
  i: integer;
  li: TListItem;
  sl: TStatusList;
begin
  sl := AdvTwitter1.Search('@cnn', 100);

  ListView1.Items.Clear();
  for i := 0 to sl.Count - 1 do
  begin
    li := ListView1.Items.Add;
    li.Caption := sl.Items.User.Name;
    li.SubItems.Add(sl.Items.Text);
    li.SubItems.Add(FormatDateTime('dd/mm/yyyy hh:nn',sl.Items.CreatedAt));
    li.Data := sl.Items;
  end;

Thank you!