[Delphi] Vkontakte component

[RedFern.89]

накодил компонент для vkontakte.

Усилием 2х кружек кофе и пачки сигарет добавил 2 возможности.

смотрите список обновлений

Список обновлений:
1. Считывает аудио-записи
2. Считывает друзей/онлайн-друзей
3. Считывает новые сообщения
4. Выбор сервера (vkontakte.ru/vk.com)
5. Отправка сообщения
6. Множественный поиск аудио
7. Прокси-сервер


возможности будут пополнятся))

устанавливается на вкладку Standard

Компоненту всего 2 дня! Прошу сильно не пинать))

исправление процедуры в Indy 7-9


procedure TIdCookieManager.DoAdd(ACookie: TIdCookieRFC2109; ACookieText, AHost: String);
Var
LDomain: String;
begin
ACookie.CookieText := ACookieText;

if Length(ACookie.Domain) = 0 then LDomain := AHost
else LDomain := ACookie.Domain;

ACookie.Domain := LDomain;

// если есть точка в начале домена, убираем ее
If ACookie.Domain[1] = '.' Then
ACookie.Domain := Copy(ACookie.Domain, 2, Length(ACookie.Domain));

if ACookie.IsValidCookie(AHost) then
begin
if DoOnNewCookie(ACookie) then
begin
FCookieCollection.AddCookie(ACookie);
end
else begin
ACookie.Collection := nil;
ACookie.Free;
end;
end
else begin
ACookie.Free;
end;
end;


ссылка на сорцы:
http://slil.ru/28695561

мелкая демка по работе с компонентом
http://slil.ru/28674926

P.S. работать не будет, если не исправить процедуру DoAdd в TidCookieManager.pas если кто не знает, как и что, пишите.

[$Smoke$]

спасибо

[$Atlet$]

Демка с индюком. Перекомпилируй. А то щас будут кричать про злой вирус)

[RedFern.89]

щас удалю exe из архива и перезалью все))) мне в лом антивирь ставить)))

[НTL]

Жалко что не на сокетах

[RedFern.89]

блин. сокеты тока 1 запрос могут послать. Если кто хочет - можете переделать и убедиться сами

[НTL]

блин. сокеты тока 1 запрос могут послать. Если кто хочет - можете переделать и убедиться сами

да ну, а если каждый раз создавать поток?

[1n0y]

P.S. работать не будет, если не исправить процедуру DoAdd в TidCookieManager.pas если кто не знает, как и что, пишите.

ааап! покажи!

[Gar|k]

RedFern.89 если делать нефиг.
щас ради интереса сохранил прямой адрес картинки на сервере - фотки и удалил ее из альбома... - в скором времени заходить по ссылке на картинку типа photos123124124 стало незя, в альбоме ее нету сразу.... а вот прямая ссылка на картинку работает. (и я думаю вообще не удаляется) - мысль - индексировать альбом пользователя проходя по страницам и выберая прямые ссылки на фото - сохранять это дело куда-нить (хоть в текстовик... на perlе сесть чтоле написать...)

в итоге у нас будут все фоты пользователя даже удаленные им и удаленные им альбомы.

з.ы: отпишу 22 удалилась ли фотка с сервака...

[RedFern.89]

Gar|k, ты имеешь ввиду, что удаляется только ссылка из бызы данных, но не удаляется картинка с сервера?))

[M_script_]

блин. сокеты тока 1 запрос могут послать. Если кто хочет - можете переделать и убедиться сами
А компоненты инди не на сокетах написаны? )

[RedFern.89]

1n0y, cтукни в асю, помогу))

[eurotat]

спасибо

[leonkiller_92]

спасибо пригодится!

[Jingo Bo]

А компоненты инди не на сокетах написаны? )
+1

А зачем этот компонент нужен, и при чём на инди в котором сто тыщ багов самом по себе)(пруф?)

[RedFern.89]

Писал для себя. А если хотите/нехотите пользоваться - дело ваше

[ilyhamas]

Спасибо. Посмотрим

[Guffi]

Спасибо новичкам покатит. А если серьёзно то спамер или что то подобное на нём серьёзный не напишешь так как всё это дело будет тормозить и глючить. Правильно говорили что нужно писать на сокетах, да икстати нет там проблем с запросами если всё правильно сделать.

[M_script_]

Правильно говорили что нужно писать на сокетах
Не обязательно на сокетах, главное не на инди :)

[GhostOnline]

M_script_ да пусть пишут на сокетах, если их еще родители кормят и время позволяет так делать

[RedFern.89]

Скоро придет это время и я сделаю все это дело на сокетах:)