| 1234567891011121314151617181920212223242526272829303132 |
- {
- $Id$
- This file is part of the Free Component Library (FCL)
- Copyright (c) 1999-2000 by the Free Pascal development team
- See the file COPYING.FPC, included in this distribution,
- for details about the copyright.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
- **********************************************************************}
- { *********************************************************************
- * TFiler *
- *********************************************************************}
- procedure TFiler.SetRoot(ARoot: TComponent);
- begin
- FRoot := ARoot;
- end;
- {
- $Log$
- Revision 1.1 2003-10-06 21:01:06 peter
- * moved classes unit to rtl
- Revision 1.3 2002/09/07 15:15:24 peter
- * old logs removed and tabs fixed
- }
|
