Zur Sichtbarkeit von TYPEN

[himitsu]

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