Newsgroups : Borland : borland.public.delphi.internet.winsock : 2006 Sep : Re: GStack
| Subject: | Re: GStack |
| Posted by: | "Roberto Meneghini" (rmeneghi..@separationsystems.com) |
| Date: | Wed, 27 Sep 2006 15:28:22 |
Hello Gambit,
This is the code that I wrote inside an "OnClick" event. As I mentioned the
only INDY10 component that I've dropped on my form is "TIdTCPServer". It is
listening at port 500 and it is active.
Regards,
Roberto
var
I:Integer;
Item: TListItem;
begin
lvLog.Items.BeginUpdate;
for I := 0 to GStack.LocalAddresses.Count - 1 do
begin
Item := lvLog.Items.Add;
Item.Caption(GStack.LocalAddresses.Strings[0]);
end;
lvLog.Items.EndUpdate;
"Remy Lebeau (TeamB)" <no.spam@no.spam.com> wrote in message
news:451ad234$1@newsgroups.borland.com...
>
> "Roberto Meneghini" <rmeneghini@separationsystems.com> wrote in message
> news:451ac4e5@newsgroups.borland.com...
>
>> I do have at least one adapter installed in my computer. I can see all
>> the information when I use "ipconfig " from the command prompt or
>> via windows "Show all connections".
>
> Then there is no way the LocalAddresses property could be giving you
> '0.0.0.0' and nothing else, without throwing an exception. What does your
> actual code look like?
>
>
> Gambit