unit tw21538; {$IFDEF FPC} {$MODE DELPHI} {$ENDIF} interface uses uw21538; var ZZ: TWrapper; implementation initialization ZZ := Z; end.