![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Многопотоковая отправлялка SMS [D7]
Sollo © (2004-08-26 09:26:00)Люди !
Подскажите плиз как мне решить проблемку.
SMS через TClientSocket на сервер я отправлять умею, а вот как сделать так, чтобы программа создавала несколько нитей по отпрвавке понять не могу.
Нужно: чтобы создался поток содержащий TClientSocket, без формы, сокет отправляет данные, обмен завершается и нить прекращает свое существование.
Sollo (2004-08-27 06:51:00) [1]Digitman ©
Спасибо большое за ответ !
Алхимик ©
Спасибо за поддержку ! :)
Sollo (2004-08-27 06:33:00) [2]Alex Konshin ©
Однообразно мыслите ! :(
Я охранную систему делаю, которая будет отправлять сообщение на телефоны.
Алхимик (2004-08-27 02:41:00) [3]
> [2] Alex Konshin © (26.08.04 20:36)
> Ничего личного, но нафига спамерам помогать?
> Я не вижу этому никакого мирного применения.
Делали как то опрос сети игровых автоматов через SMS.
Заказчик захотел.
RaPtoR_1 (2004-08-26 22:18:00) [4]Удалено модератором
Примечание: Оффтоп...
Alex Konshin (2004-08-26 20:36:00) [5]Ничего личного, но нафига спамерам помогать?
Я не вижу этому никакого мирного применения.
Digitman (2004-08-26 09:34:00) [6]procedure TMyThread.Execute;
var
cs: TClientSocket;
begin
try
cs := TClientSocket.Create(nil);
with cs do
try
ClientType := ctBlocking;
Host := ...;
Port := ...;
Open;
SendText(...);
ReturnValue := 1;
finally
Free;
end;
except
ReturnValue := 0;
end;
end;