Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   [Delphi] Функцию в паток (https://forum.antichat.xyz/showthread.php?t=198591)

cel 23.04.2010 16:36
[Delphi] Функцию в паток
 
Хелп!У мну есть функция,я её пытаюсь вывести в поток,но у меня не палучаеца,может кто нибуть даст сорц с каментоми?

[stranger] 23.04.2010 16:58
мб лучше ты сорец дашь?
что не получается? как поток создаешь?

ZdezBilYa 23.04.2010 17:24
глянь видео: http://avtuh.ru/2010/04/09/delphi-dopolnitelnyj-potok-v-programme.html

RedFern.89 23.04.2010 17:27
a ваще я предложу так:

Код:
type TmyThread = class(TThread)
procedure Execurte; override;
end;

....

procedure TMyThread.Execute;
begin
// Код функции
end;
в принципе это самы стандартный пример)))) Вызываеца так:

Код:
var MyThread : TMyThread;
begin
  MyThread := TMyThread.Create(False);
end;
кароче думаю вы понели о чем речь))))

fenixelite 23.04.2010 17:31
cel, Добавляешь в проект Thread Object и делаешь то что написал RedFern )

[stranger] 23.04.2010 20:41
ну почему же? вполне можно обойтись и так:
Код:
procedure fcn();
begin
  {come thread code}
end;

procedure TForm1.Button1Click(Sender: TObject);
 var thid: cardinal;
begin
  CreateThread(nil,0,@fnc,nil,0,thid);
end;
но в этом случае немного сложнее с синхронизацией..
в общем, все зависит от конкретной задачи

M_script_ 23.04.2010 21:03
Цитата:
Сообщение от [stranger]
но в этом случае немного сложнее с синхронизацией..
Чем? EnterCriticalSection дольше писать, чем Synchronize?

cel 23.04.2010 21:32
ок,всё понял,ещё есть 1 вопрос,пишу здесь дабы не плодить темы:
Как можно спарсить куку при входе в контакт, когда авторизуешся через соцкет?

gisTy 23.04.2010 22:47
Цитата:
соцкет
:triple_facepalm:

M_script_ 23.04.2010 23:06
Цитата:
Сообщение от cel
ок,всё понял,ещё есть 1 вопрос,пишу здесь дабы не плодить темы:
Как можно спарсить куку при входе в контакт, когда авторизуешся через соцкет?
парсишь текст между 'remixsid=' и ';'

cel 24.04.2010 00:00
Цитата:
Сообщение от M_script_
парсишь текст между 'remixsid=' и ';'
я это зна. как,я не понемаю, у меня выходит тока в TClientSocket в ответе:
Код HTML:
HTTP/1.1 200 OK
Server: nginx/0.7.59
Date: Fri, 23 Apr 2010 19:58:00 GMT
Content-Type: text/html; charset=windows-1251
Connection: keep-alive
X-Powered-By: PHP/5.2.6-1+lenny3
Pragma: no-cache
Cache-control: no-store
P3P: CP="IDC DSP COR ADM DEVi TAIi PSA PSD IVAi IVDi CONi HIS OUR IND CNT"
Set-Cookie: l=33244867; expires=Wed, 04-May-2011 12:40:08 GMT; path=/; domain=login.vk.com
Set-Cookie: p=a73839ac6d728d1f88f44ce2f9db1c1650ca; expires=Sat, 16-Apr-2011 06:28:04 GMT; path=/; domain=login.vk.com
Content-Encoding: gzip
Vary: Accept-Encoding
Content-Length: 346
и я хз что парсить т.к. я автаризуюсь через загаловки

RedFern.89 24.04.2010 01:38
куки (а точнее remixsid) тебе выдаюца после 2го запроса на сервер)) после login.vk.com

M_script_ 24.04.2010 14:06
Цитата:
Сообщение от cel
и я хз что парсить т.к. я автаризуюсь через загаловки
Авторизуйся get-запросом "http://vkontakte.ru/login.php?email=ТВОЙ_ЛОГИН&pass=ТВОЙ_ ПАС", в ответе будет remixsid

cel 24.04.2010 15:52
Цитата:
Сообщение от M_script_
Авторизуйся get-запросом "http://vkontakte.ru/login.php?email=ТВОЙ_ЛОГИН&pass=ТВОЙ_ ПАС", в ответе будет remixsid
не, это не то,мне нужно узнать как вытащить куку s через соцкет,я её и не магу вытощить чтоб отправить на http://vkontakte.ru/login.php

M_script_ 24.04.2010 16:09
Цитата:
Сообщение от cel
не, это не то,мне нужно узнать как вытащить куку s через соцкет,я её и не магу вытощить чтоб отправить на http://vkontakte.ru/login.php
s никакого отношения к кукам не имеет и парсится из тела ответа

cel 24.04.2010 16:17
хорошо, как тогда палучить тело ответа из соцкетов?

cel 24.04.2010 19:21
ап

[stranger] 24.04.2010 19:30
тело идет после заголовка через #13#10#13#10

cel 24.04.2010 23:25
Цитата:
Сообщение от [stranger]
тело идет после заголовка через #13#10#13#10
вот что мне кидает после заголовков
Код HTML:
HTTP/1.1 200 OK
Server: nginx/0.7.59
Date: Sat, 24 Apr 2010 19:22:49 GMT
Content-Type: text/html; charset=windows-1251
Connection: keep-alive
X-Powered-By: PHP/5.2.6-1+lenny4
Pragma: no-cache
Cache-control: no-store
P3P: CP="IDC DSP COR ADM DEVi TAIi PSA PSD IVAi IVDi CONi HIS OUR IND CNT"
Set-Cookie: l=33206867; expires=Sun, 01-May-2011 14:59:48 GMT; path=/; domain=login.vk.com
Set-Cookie: p=b5767e60e83f9ec53ec585f85741bb4cabcc; expires=Sat, 30-Apr-2011 21:08:48 GMT; path=/; domain=login.vk.com
Content-Encoding: gzip
Vary: Accept-Encoding
Content-Length: 346

‹- врятли это тело)


Время: 11:14