| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
перенаправление порта [D5, D6, NT4, Win2k, WinXP]
неРуль © (2003-10-06 12:10:00)
как перенаправить данные с порта удаленного компа на порт своего компа, чтобы потом можно было коннектиться к нему по локалке например браузером
xGhost (2003-10-22 14:56:00) [1]
качай компонент proxy и примеры к нему отсюда
http://17slon.com/gp/gp/tgphttpproxy.htm
неРуль (2003-10-11 13:57:00) [2]
алло, подскажите плиз
неРуль (2003-10-10 13:09:00) [3]
у компонента IdMappedPortTCP есть следующие события
OnBeforeClientConnect, OnConnect, OnDisconnect, OnExecute, OnStatus. Ни у одного из них нету таких формальных параметров. Так у кого же тогда есть событие TWorkBeginEvent, если у меня только форма и ентот компонент???
Е-Моё имя (2003-10-09 18:18:00) [4]
блиииииииииииииииииииин
есть событие TWorkBeginEvent
возникает при начале работы
TWorkBeginEvent = procedure (Sender: TObject; AWorkMode: TWorkMode; const AWorkCountMax: Integer) of object;
берешь AWorkCountMax и обрабатываешь
я не пойму, что тебе непонятно
неРуль (2003-10-09 18:10:00) [5]
из каких переменных, полей, поконкретней, плз
Е-Моё имя (2003-10-09 18:07:00) [6]
beginwork вызывается при начале работы
когда начинается передача
там и считай
неРуль (2003-10-09 18:03:00) [7]
извини за ламерство, но как трафик то тогда считывать, откудова? И по какому событию, может?
Е-Моё имя (2003-10-09 17:58:00) [8]
ты не должен вызывать beginwork
за тебя все будет сделано
неРуль (2003-10-09 17:54:00) [9]
2Е-Моё имя дык пробовал я так конечно, но в ASize ничего не передается :(((
пробовал так:
procedure TForm1.Button1Click(Sender: TObject);
var c1, c2: longint;
begin
IdMappedPortTCP1.BeginWork(wmRead, c1);
Label1.Caption:= inttostr(c1);
IdMappedPortTCP1.BeginWork(wmWrite, c2);
Label2.Caption:= inttostr(c2);
end;
или надо по другому?
Е-Моё имя (2003-10-09 17:20:00) [10]
ты за 2 дня не мог разобраца с [20]?!
неРуль (2003-10-09 17:19:00) [11]
HELP!!!
неРуль (2003-10-09 17:19:00) [12]
HELP!!!
неРуль (2003-10-08 18:58:00) [13]
в делфе демки самые простецкие без подсчета трафика, в инете примеров с этим компонентом я что то не нашел. Может кто знает, как это делать?
Е-Моё имя (2003-10-07 18:13:00) [14]
TIdComponent.BeginWork
procedure BeginWork(AWorkMode: TWorkMode; const ASize: Integer); virtual;
в ASize - размер данных
у меня кода нет, поищи где-нить демки
неРуль (2003-10-07 17:33:00) [15]
2Е-Моё имя нет, это видимо я такой тупой, ну не могу я с этим beginwork разобраться как его юзать, да и инглиш слабоват, помоги еще разок плз
Е-Моё имя (2003-10-07 16:34:00) [16]
> [16] неРуль (07.10.03 16:11)
пожалста
если бы сразу написал понятно, давно бы сделал )))
я такой тупой, что только после [11] понял, чо надо
так что учти на будущее
> [17] неРуль (07.10.03 16:21)
можно
в beginwork передается число байт
неРуль (2003-10-07 16:21:00) [17]
только один еще вопрос, можно ли посчитать трафик через это соединение?
неРуль (2003-10-07 16:11:00) [18]
2Е-Моё имя большое спасибо, то что надо, все пашет
Е-Моё имя (2003-10-07 15:54:00) [19]
TIdMappedPortTCP is a TIdTCPServer descendant that implements a proxy for connections to a remote computer system. TIdMappedPortTCP listens for connections on a designated port number and makes a connection to another server using a specified port number. This is useful for certain types of proxy programs.
Е-Моё имя (2003-10-07 15:52:00) [20]
tidmappedport, Indy?
| |
Страницы: 