- Рег
- 28 Дек 2015
- Сообщения
- 6
- Реакции
- 0
uses sysutils,classes;
begin
while Engine.Status = lsOnline do begin
if (ChatMessage.ChatType = ctParty) and ChatMessage.Unread then //непрочитанное сообщение тип чата mtPrivate=ПМ mtParty mtAll=белый
begin
if (ChatMessage.Text = 'пати') then engine.SetTarget(ChatMessage.Sender); //текстом - делаем
engine.useskill(1403); // ID скилла summon'a
end;
delay(2000);
end;
end.
по сообщению в пати " пати" должен Тпшнуть меня, но пишет " ЦЕЛЬ НЕ НАЙДЕНА " подскажите что тут не так?!
begin
while Engine.Status = lsOnline do begin
if (ChatMessage.ChatType = ctParty) and ChatMessage.Unread then //непрочитанное сообщение тип чата mtPrivate=ПМ mtParty mtAll=белый
begin
if (ChatMessage.Text = 'пати') then engine.SetTarget(ChatMessage.Sender); //текстом - делаем
engine.useskill(1403); // ID скилла summon'a
end;
delay(2000);
end;
end.
по сообщению в пати " пати" должен Тпшнуть меня, но пишет " ЦЕЛЬ НЕ НАЙДЕНА " подскажите что тут не так?!