Meanwhile a workaround ...

I have disconnected the event and connect it programmatically like this
as required:-

  Ping.OnDnsLookupDone := PingDnsLookupDone;
  try
     .
     .
     .
  finally
    .
    .
    .
    Ping.OnDnsLookupDone := nil;
  end;

This works fine - very weird!

Cheers

Jeff

--
Jeff Cook
Aspect Systems Ltd
Phone: +64-9-424 5388
Skype: jeffcooknz
www.aspect.co.nz
 


> -----Original Message-----
> From: [EMAIL PROTECTED] 
> [mailto:[EMAIL PROTECTED] On Behalf Of Jeff Cook
> Sent: Wednesday, 13 September 2006 1:45 p.m.
> To: twsocket@elists.org
> Subject: [twsocket] Ping stopped working - in fact kills the 
> program first!
> 
> 
> Hi
>  
> I have been making some program changes in the same module as 
> a Ping procedure.
>  
> On creating the module I now get an error:-
>  
> Exception EReadError in ...
> Error reading Ping.OnDnsLookupDone: Invalid property value.
>  
> In the .dfm module the Ping looks like this :-
>  
>   object Ping: TPing
>     Size = 56
>     Timeout = 4000
>     TTL = 64
>     Flags = 0
>     OnDnsLookupDone = PingDnsLookupDone
>     Left = 188
>     Top = 82
>   end
> 
> The error goes away if I disconnect the event.  I'm not aware 
> of making any change in the Ping area - but I have obviously 
> upset something.  I suspect that this has nothing at all to 
> do with ICS - but have no idea what is wrong.  Any ideas?
>  
> Cheers
>  
> Jeff
>  
> P.S. Delphi 6 - not sure what version of ICS (can't see a 
> version number anywhere).
> --
> 
> Jeff Cook
> 
> Aspect Systems Ltd
> 
> Phone: +64-9-424 5388
> 
> Skype: jeffcooknz
> 
> HYPERLINK "http://www.aspect.co.nz/"www.aspect.co.nz
> 
>  
> 
>  
> 
> -- 
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.1.406 / Virus Database: 268.12.3/446 - Release 
> Date: 12/09/2006
>  
> -- 
> To unsubscribe or change your settings for TWSocket mailing 
> list please goto http://www.elists.org/mailman/listinfo/twsocket
> Visit our website at http://www.overbyte.be
> 
> -- 
> No virus found in this incoming message.
> Checked by AVG Anti-Virus.
> Version: 7.1.406 / Virus Database: 268.12.3/446 - Release 
> Date: 12/09/2006
>  
> 

-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.1.406 / Virus Database: 268.12.3/446 - Release Date:
12/09/2006
 

-- 
To unsubscribe or change your settings for TWSocket mailing list
please goto http://www.elists.org/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be

Reply via email to