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
> {$IFNDEF NO_DEBUG_LOG}
> 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
http://www.alpikom.it
--
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
