1 2 3 4 5 6 7 8 9 10 11
unit tb0406; {$ifndef WITH_FULL} interface uses ub0406; implementation end. {$endif}