Erstown
29.07.2012, 19:32
Как сделать массовую отправку сообщений?
Принцип такой:
1. Запускаешь программу.
2. Разрешаешь доступ к этой программе в Скайпе.
3. Получаешь список логинов друзей скайпа в ListBox1(Программно).
4. С выбранным логином и совершаются действия. Например, выбрал логин skype777 в ListBox1, отправил сообщение.
Я включил MultiSelect в ListBox1, как теперь реализовать массовую отправку сообщений? Чтобы действие совершалось не на один выбранный логин в ListBox1, а сразу на несколько.
Отправка сообщения:
var
msg:IChatMessage;
begin
msg:=CoChatMessage.Create;
msg:=Skype.SendMessage(ListBox1.Items[ListBox1.ItemIndex],Memo2.Text);
end;
Принцип такой:
1. Запускаешь программу.
2. Разрешаешь доступ к этой программе в Скайпе.
3. Получаешь список логинов друзей скайпа в ListBox1(Программно).
4. С выбранным логином и совершаются действия. Например, выбрал логин skype777 в ListBox1, отправил сообщение.
Я включил MultiSelect в ListBox1, как теперь реализовать массовую отправку сообщений? Чтобы действие совершалось не на один выбранный логин в ListBox1, а сразу на несколько.
Отправка сообщения:
var
msg:IChatMessage;
begin
msg:=CoChatMessage.Create;
msg:=Skype.SendMessage(ListBox1.Items[ListBox1.ItemIndex],Memo2.Text);
end;