home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 February / Chip_2000-02_cd.bin / zkuste / Delphi / navody / tt / objvm.exe / UNITS / MemberValue.pas < prev    next >
Pascal/Delphi Source File  |  1998-03-16  |  349b  |  17 lines

  1. unit MemberValue;
  2.  
  3. interface
  4. uses LangValue;
  5. type TMemberValue=class(ILangValue)
  6.      public
  7.        Parent:ILangValue;
  8.        constructor Create(aParent:ILangValue);
  9.      end;
  10. implementation
  11. constructor TMemberValue.Create;
  12.             begin
  13.               Inherited Create(nil);
  14.               Parent:=aParent;
  15.             end;
  16. end.
  17.