Skocz do zawartości


Zdjęcie

Blokowanie wysyłania wiadomości


  • Zaloguj się, aby dodać odpowiedź
Brak odpowiedzi do tego tematu

#1 Draen

Draen

    Bywalec

  • Użytkownik
  • 128 postów

Napisano 2013.03.18, 21:00

Witam,

w funkcji Load mam taki kod:

  PluginAccountEvents.cbSize := sizeof(TPluginAccountEvents);
  PluginAccountEvents.DisplayName := 'LAN';
  PluginAccountEvents.EventNew := false;
  PluginAccountEvents.EventEdit := false;
  PluginAccountEvents.EventDelete := false;
  PluginAccountEvents.EventPassChange := false;
  PluginAccountEvents.EventDefault := true;
  PluginAccountEvents.IconIndex := 122;
  PluginAccountId := PluginLink.CallService(AQQ_SYSTEM_ACCOUNT_EVENTS, 0, DWord(@PluginAccountEvents));

  PluginAgent.cbSize := sizeof(TPluginAgent);
  PluginAgent.JID := 'lan.plugin.aqq.eu';
  PluginAgent.Name := 'Kontakt LAN';
  PluginAgent.Prompt := 'Nazwa komp. / IP:';
  PluginAgent.Transport := true;
  PluginAgent.Search := false;
  PluginAgent.Groupchat := false;
  PluginAgent.CanRegister := false;
  PluginAgent.Description := 'Wtyczka sieciowa do rozmów w sieci LAN';
  PluginAgent.RequiredID := true;
  PluginAgent.PluginAccountName := 'LAN';
  PluginAgent.IconIndex := 122;
  PluginLink.CallService(AQQ_SYSTEM_SETAGENT, 0, DWord(@PluginAgent));

  PluginLink.HookEvent(AQQ_CONTACTS_PRESENDMSG, OnMessageSent);

 

Funkcja OnMessageSent wygląda tak:

function OnMessageSent(wParam: WPARAM; lParam: LPARAM): Integer; stdcall;
begin
  if Pos('lan.plugin.aqq.eu', PPluginContact(wParam)^.JID) > 0 then
  begin
    {kilka linijek kodu (bez znaczenia)}
    Result := 1;
  end
  else Result := 0;
end;

 

Po dodaniu nowego kontaktu pochodzącego z tej wtyczki i wysłaniu do niego wiadomości, AQQ próbuje wysłać wiadomość z konta głównego mimo, że w notyfikacji AQQ_CONTACT_PRESENDMSG zwracam 1. Jeżeli nawet zwrócę 1 w tej notyfikacji nie używając warunku to wiadomości z konta głównego nadal są wysyłane, natomiast np. z GG są zablokowane. Jakieś rady?

 

//EDIT:

Albo inne pytanie: Jak zrobić, aby wiadomość była powiązana z kontem z tej wtyczki, a nie z kontem głównym?

580Oa1F.jpg


Użytkownik Draen edytował ten post 2013.03.19, 14:33





Użytkownicy przeglądający ten temat: 0

0 użytkowników, 0 gości, 0 anonimowych