 |
|
23.04.2010, 16:36
|
|
Познающий
Регистрация: 11.11.2008
Сообщений: 72
С нами:
9208607
Репутация:
0
|
|
[Delphi] Функцию в паток
Хелп!У мну есть функция,я её пытаюсь вывести в поток,но у меня не палучаеца,может кто нибуть даст сорц с каментоми?
|
|
|
23.04.2010, 16:58
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
С нами:
8563393
Репутация:
28
|
|
мб лучше ты сорец дашь?
что не получается? как поток создаешь?
|
|
|
|
23.04.2010, 17:24
|
|
Участник форума
Регистрация: 29.08.2008
Сообщений: 151
С нами:
9315854
Репутация:
107
|
|
глянь видео: http://avtuh.ru/2010/04/09/delphi-dopolnitelnyj-potok-v-programme.html
|
|
|
|
23.04.2010, 17:27
|
|
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
С нами:
8582863
Репутация:
69
|
|
a ваще я предложу так:
Код:
type TmyThread = class(TThread)
procedure Execurte; override;
end;
....
procedure TMyThread.Execute;
begin
// Код функции
end;
в принципе это самы стандартный пример)))) Вызываеца так:
Код:
var MyThread : TMyThread;
begin
MyThread := TMyThread.Create(False);
end;
кароче думаю вы понели о чем речь)))) |
|
|
|
23.04.2010, 17:31
|
|
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
С нами:
8556802
Репутация:
79
|
|
cel, Добавляешь в проект Thread Object и делаешь то что написал RedFern )
|
|
|
|
23.04.2010, 20:41
|
|
Участник форума
Регистрация: 02.02.2010
Сообщений: 107
С нами:
8563393
Репутация:
28
|
|
ну почему же? вполне можно обойтись и так:
Код:
procedure fcn();
begin
{come thread code}
end;
procedure TForm1.Button1Click(Sender: TObject);
var thid: cardinal;
begin
CreateThread(nil,0,@fnc,nil,0,thid);
end;
но в этом случае немного сложнее с синхронизацией..
в общем, все зависит от конкретной задачи |
|
|
|
23.04.2010, 21:03
|
|
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
С нами:
9227388
Репутация:
180
|
|
Сообщение от [stranger]
но в этом случае немного сложнее с синхронизацией..
Чем? EnterCriticalSection дольше писать, чем Synchronize?
|
|
|
|
23.04.2010, 21:32
|
|
Познающий
Регистрация: 11.11.2008
Сообщений: 72
С нами:
9208607
Репутация:
0
|
|
ок,всё понял,ещё есть 1 вопрос,пишу здесь дабы не плодить темы:
Как можно спарсить куку при входе в контакт, когда авторизуешся через соцкет?
|
|
|
|
23.04.2010, 22:47
|
|
Постоянный
Регистрация: 24.05.2008
Сообщений: 589
С нами:
9454841
Репутация:
504
|
|
|
|
|
|
23.04.2010, 23:06
|
|
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
С нами:
9227388
Репутация:
180
|
|
Сообщение от cel
ок,всё понял,ещё есть 1 вопрос,пишу здесь дабы не плодить темы:
Как можно спарсить куку при входе в контакт, когда авторизуешся через соцкет?
парсишь текст между 'remixsid=' и ';'
|
|
|
|
|
|
|
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
[Delphi] Переключение потоков между собой
|
_PARAZIT_ |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
27 |
25.12.2009 10:33 |
|
[Delphi] GetText из msctls_statusbar32
|
ex3me |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
1 |
20.08.2009 12:05 |
|
Получить функцию графика
|
miqo |
Болталка |
4 |
12.08.2009 21:32 |
|
[Delphi] активация звуковой картой
|
Ant1Player |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
3 |
07.08.2009 21:20 |
|
Помогите составить функцию
|
!{ra!{e/\/ |
С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby |
0 |
14.12.2008 14:04 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
![Аватар для [stranger]](/avatars/avatar113122.jpg?2096623){kind=avatar}
![Аватар для [stranger]](/avatars/avatar113122.jpg?2097148){kind=avatar}
Линейный вид
