в первом посте темы выложил стелс.
скайп рабочий полностью.
питон x64 поддерживается и запускается.
в паксскрипте обращаться к скайпу через класс SkypeApi
Код:
program test_sript;
procedure SkypeEventsHandler(SenderNickName, SenderId, EventMsg: String; EventCode : Byte);
begin
case EventCode of
evCode_Connected : AddToJournal('Skype Connected!');
evCode_ServerDisconnected : AddToJournal('Skype Disconnected, try to reconnect!');
evCode_ClientDisconnected : AddToJournal('Skype Disconnected.');
evCode_MsgReceived : AddToJournal('SkypeMsg : "' + SenderNickName + '('
+ SenderId + ') : "' + EventMsg + '"');
evCode_Error : AddToJournal('SkypeError : "' + SenderNickName + '('
+ SenderId + ') : "' + EventMsg + '"');
end;
end;
begin
SetEventProc(evSkypeEvent, 'SkypeEventsHandler');
SkypeApi.Connect('your_login','your_pass');
while not SkypeApi.Connected do
wait(200);
SkypeApi.SendMessage('test1','receiver_id');
wait(100);
SkypeApi.SendMessage('test2', SkypeApi.GetIdByNickname('тот_ник_что_выставлен_на_контакт_в_скайпе'));
if SkypeApi.Connected then
SkypeApi.Disconnect;
while (true) do
begin
Wait(100);
end;
end.
для внешних скриптов: в дельфийской обертке то же самое через Script.Skype. В питон-обертке оно в виде методов, кто захочет - сам обернет в класс.
c# обертка еще не обновлена, на подходе.
Поддержка IRC полуреализована, но очень уж криво, возможно будет убрана нафиг.
в паксе добавлена procedure WinExec(FileName : String; Parameters: String = ''); второй параметр - опциональный, те необязательный.
В целом куча всего добавлена и переделана, буду делать изменения одним большим постом, да и вики надо обновить\дополнить.
Но конкретно сейчас меня интересуют тесты всего подряд. Работа скриптов, коннекты, да все что угодно. С любыми проблемами сюда, или в скайп\асю мне, как удобнее.
А проблемы будут, это я и так могу сказать.