Scrive Arno Garrels <[EMAIL PROTECTED]>:
> Maurizio Lotauro wrote:
> > 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?
>
> Yes, in the object inspector.
The OI display a private var??
>
> > What about the line immediatly before?
>
> What line do you mean?
The line of code before {$IFNDEF NO_DEBUG_LOG}, maybe there is a ";" or
an "end" missed.
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
