Scrive Arno Garrels <[EMAIL PROTECTED]>:

> This one displays anything below in the private section, does not work at all
> TCustomWSocket = class( {$IFNDEF NO_DEBUG_LOG} TIcsBaseLogComp {$ELSE}
> TComponent {$ENDIF})
> Displays TCustomWSocket as a private var an puts all other privat vars under
> protected
>     TCustomWSocket = class(TIcsBaseLogComp)
> {$ELSE}
>     TCustomWSocket = class(TComponent)
> {$ENDIF}
> private
>     FDnsResult          : String;

Do you mean that TCustomSocket is considered as a var instead of a class?
What about the line immediatly before?

Bye, Maurizio.

This mail has been sent using Alpikom webmail system

To unsubscribe or change your settings for TWSocket mailing list
please goto
Visit our website at

Reply via email to