idMappedPortTCP

← →
BVV (2004-08-25 10:44) [0]

Не получается изменить свойства idMappedPortTCP.DefaultPort, idMappedPortTCP.MappedPort, idMappedPortTCP.MappedHost компонента idMappedPortTCP в исполняемой программе.
Делаю так:

procedure TForm1.Button1Click(Sender: TObject);
begin
MappedPortTCP.Active:=False;
MappedPortTCP.DefaultPort:=StrToInt(Edit1.Text);
MappedPortTCP.MappedPort:=StrToInt(Edit2.Text);
MappedPortTCP.MappedHost:=Edit3.Text;
MappedPortTCP.Active:=True;
end;

Активируется и дезактивируется без проблем, но вот фаервол указывает что номер открытого порта не изменился.
Далее проверяю эти же свойства, так

procedure TForm1.Button2Click(Sender: TObject);
begin
Memo1.Lines.Add(inttostr(MappedPortTCP.MappedPort)
+" "+MappedPortTCP.MappedHost+" "
+inttostr(MappedPortTCP.DefaultPort));
end;

и обнаруживаю что все они меняются на нужные мне.
Получается что "внутренне" они как бы меняются, а вот "внешне" нет.
Я не знаю глюк это или нет, но может кто то уже столкнулся с подобной проблемой и знает как ее решить ?

← →
BVV (2004-08-25 15:34) [1]

Выходит нет.

idMappedPortTCP Найти похожие ветки