🚀 go-pugleaf

Thank you for your quick help Gambit,

in the meantime I found the way to clear the binding according to your tip:
...
void __fastcall TForm1::Edit1DblClick(TObject *Sender)
{
 IdTCPServer1->Active=false;
 IdTCPServer1->Bindings->Clear();
 IdTCPServer1->DefaultPort=StrToInt(Edit1->Text);
 IdTCPServer1->Active=true;
 ListBox1->Items->Add( "Port: " + IntToStr(IdTCPServer1->DefaultPort) );
}
...

Regards Robert

"Remy Lebeau (TeamB)" <no.spam@no.spam.com> schrieb im Newsbeitrag 
news:450836b4$1@newsgroups.borland.com...
>
> "RobertL" <nospam@nospam.com> wrote in message
> news:4508012b$1@newsgroups.borland.com...
>
>> with this code I try to change the defaultport property and it
>> shows the desired port in the listbox, but allways the port set
>> at designtime is active, there is no change to the new value.
>
> Do you have any items already created in the Bindings collection when you
> make the change?  Changing the DefaultPort has no effect on existing items
> in the Bindings collection, only on new items that are added to the
> collection afterwards.  Each Binding has its own Port property that it
> listens on.  That value is initialized by the DefaultPort only when the
> Binding is first created.  Changing the DefaultPort does not update the 
> Port
> of existing Bindings.
>
>
> Gambit
>
>