![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Socket - все в одном [D5]
romychk © (2002-12-05 12:58:00)Посоветуйте можна ли в одной процедуре, не обрабытывая собития подключиться к сокету, передать даные, и отключиться.
Digitman (2002-12-05 16:32:00) [1]пардон, ошибка, и без raise сойдет :
var
ClientSocket: TClientSocket;
..
ClientSocket := TClientSocket.Create(nil);
with ClientSocket do
try
ClientType := ctBlocking;
Host := "SomeHost";
Service := "SomeService";
Open;
Socket.SendText("SomeText");
finally
ClientSocket.Free;
end;
Digitman (2002-12-05 16:29:00) [2]
> Sheriff
ну и что тут поймешь ? вот пример, как раз - для "начинающего" :
var
ClientSocket: TClientSocket;
..
ClientSocket := TClientSocket.Create(nil);
with ClientSocket do
try
ClientType := ctBlocking;
Host := "SomeHost";
Service := "SomeService";
Open;
Socket.SendText("SomeText");
finally
ClientSocket.Free;
raise;
end;
Sheriff (2002-12-05 16:02:00) [3]Не обязательно...
Все в одной куче для начинающего понять проще.
А для понимания закулисной работы элементов требуется опыт и кропотливое изучение алгоритмов работы оных.
Reindeer Moss Eater (2002-12-05 13:52:00) [4]Одну процедуру легко и просто скопировать с форума и вставить в свой код. Вот и вся блажь
Digitman (2002-12-05 13:40:00) [5]Можно. Но что за блажь такая - все "в одной процедуре" - это сложно понять)
Polevi (2002-12-05 13:12:00) [6]да если режим блокирующий
pwlusa (2002-12-05 13:03:00) [7]Что именно ты хочешь передать, и что за события ты не хочешь использовать?