lazarus/lcl/interfaces/win32/interfaces.pp
2004-03-05 01:04:21 +00:00

46 lines
1.5 KiB
ObjectPascal

{
/***************************************************************************
Interfaces.pp - determines what interface to use
-------------------
Initial Revision : Thu July 1st CST 1999
***************************************************************************/
*****************************************************************************
* *
* This file is part of the Lazarus Component Library (LCL) *
* *
* See the file COPYING.LCL, 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. *
* *
*****************************************************************************
}
Unit Interfaces;
{$mode objfpc}{$H+}
Interface
Uses
InterfaceBase;
Implementation
uses
Win32Int, Forms;
Initialization
InterfaceObject := TWin32WidgetSet.Create;
Finalization
FreeInterfaceObject;
End.