ab mindestens TurboDelphi/Delphi2006 geht sowas
Delphi-Quellcode:
t_sichtbare_Klasse = CLASS
....
PRIVATE
TYPE
t_xy =....
VAR
xy:t_xy;
END;
oder
Delphi-Quellcode:
t_sichtbare_Klasse = CLASS
....
PRIVATE
TYPE t_xy =....
PRIVATE
xy:t_xy;
END;
oder du definierst es in einer anderen
Unit ... solange diese
Unit nirgendwo anders eingebunden ist, ist es auch nirgends außerhalb sichtbar.
PS: das geht alles übrigend auch mit Konstanten
